~ubuntu-branches/ubuntu/intrepid/mew-beta/intrepid

« back to all changes in this revision

Viewing changes to debian/mew-nmz.el

  • Committer: Bazaar Package Importer
  • Author(s): Tatsuya Kinoshita
  • Date: 2008-05-06 21:19:02 UTC
  • mfrom: (1.1.13 upstream)
  • Revision ID: james.westby@ubuntu.com-20080506211902-iz2p6mw0tak0slkm
Tags: 6.0.51~0.20080505-1
* New upstream release. (CVS trunk on 2008-05-05)
* debian/mew-nmz.el: Version 2008-04-06, downloaded from
  `http://www.meadowy.org/~shirai/elips/mew-nmz.el.gz'.

Show diffs side-by-side

added added

removed removed

Lines of Context:
18
18
    (error nil)))
19
19
 
20
20
;; Variables
21
 
(defconst mew-nmz-version "2008-02-28")
 
21
(defconst mew-nmz-version "2008-04-06")
22
22
 
23
23
(defgroup mew-nmz nil
24
24
  "Namazu support with Mew."
732
732
  (let ((protos (delq mew-folder-virtual (copy-sequence mew-folder-prefixes)))
733
733
        (allcases (if (null mew-config-alist)
734
734
                      '("")
735
 
                    (mapcar (lambda (x) (car x)) mew-config-alist)))
 
735
                    (mapcar (lambda (x) (if (stringp (car x))
 
736
                                            (car x)
 
737
                                          (symbol-name (car x))))
 
738
                            mew-config-alist)))
736
739
        flist cases donecases flds fld dir)
737
740
    (message "mew-nmz getting all folders...")
738
741
    (dolist (proto protos)