* elmo-localdir.el (elmo-folder-expand-msgdb-path): Expand
authoryoichi <yoichi>
Fri, 17 Jan 2003 09:57:28 +0000 (09:57 +0000)
committeryoichi <yoichi>
Fri, 17 Jan 2003 09:57:28 +0000 (09:57 +0000)
dir-name only if it is absolute path.
(TODO: distinguish +/something and +something)

elmo/ChangeLog
elmo/elmo-localdir.el

index 2cb67fc..6b12cb4 100644 (file)
@@ -1,3 +1,9 @@
+2003-01-17  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
+
+       * elmo-localdir.el (elmo-folder-expand-msgdb-path): Expand
+       dir-name only if it is absolute path.
+       (TODO: distinguish +/something and +something)
+
 2003-01-15  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
        * elmo-localdir.el (elmo-folder-expand-msgdb-path): Correct msgdb
index 664204e..3f3c8d4 100644 (file)
     (mapcar
      'elmo-replace-string-as-filename
      (split-string
-      (expand-file-name (elmo-localdir-folder-dir-name-internal folder))
+      (let ((dir-name (elmo-localdir-folder-dir-name-internal folder)))
+       (if (file-name-absolute-p dir-name)
+           (expand-file-name dir-name)
+         dir-name))
       "/"))
     "/")
    (expand-file-name ;;"localdir"