[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Files that begin with a period

From: Eli Zaretskii
Subject: Files that begin with a period
Date: Sun, 19 Oct 2008 12:29:26 +0200

I installed today in several Lisp files, including in the `lisp/org'
directory, changes that run file names which supply values to
defcustom's through `convert-standard-filename'.  This is for when
Emacs runs on 8+3 (a.k.a. DOS) filesystems that do not allow file
names with a leading period.  (On modern filesystems,
`convert-standard-filename' leaves the file name intact.)

The changes to the Org files appear below, for your convenience when
merging them with your repository.


2008-10-19  Eli Zaretskii  <address@hidden>

        * org.el (org-default-notes-file): 
        * org-publish.el (org-publish-timestamp-directory): 
        * org-id.el (org-id-locations-file): Run file names that begin
        with a period thru `convert-standard-filename'.

Index: org/org.el
RCS file: /cvsroot/emacs/emacs/lisp/org/org.el,v
retrieving revision 1.16
diff -u -r1.16 org.el
--- org/org.el  12 Oct 2008 06:12:47 -0000      1.16
+++ org/org.el  19 Oct 2008 10:16:49 -0000
@@ -1204,7 +1204,7 @@
   :group 'org-remember
   :type 'directory)
-(defcustom org-default-notes-file "~/.notes"
+(defcustom org-default-notes-file (convert-standard-filename "~/.notes")
   "Default target for storing notes.
 Used by the hooks for remember.el.  This can be a string, or nil to mean
 the value of `remember-data-file'.
Index: org/org-publish.el
RCS file: /cvsroot/emacs/emacs/lisp/org/org-publish.el,v
retrieving revision 1.8
diff -u -r1.8 org-publish.el
--- org/org-publish.el  12 Oct 2008 06:12:46 -0000      1.8
+++ org/org-publish.el  19 Oct 2008 10:17:17 -0000
@@ -276,7 +276,8 @@
   :group 'org-publish
   :type 'boolean)
-(defcustom org-publish-timestamp-directory "~/.org-timestamps/"
+(defcustom org-publish-timestamp-directory
+  (convert-standard-filename "~/.org-timestamps/")
   "Name of directory in which to store publishing timestamps."
   :group 'org-publish
   :type 'directory)
Index: org/org-id.el
RCS file: /cvsroot/emacs/emacs/lisp/org/org-id.el,v
retrieving revision 1.5
diff -u -r1.5 org-id.el
--- org/org-id.el       12 Oct 2008 06:12:45 -0000      1.5
+++ org/org-id.el       19 Oct 2008 10:17:28 -0000
@@ -116,7 +116,7 @@
   :group 'org-id
   :type 'boolean)
-(defcustom org-id-locations-file "~/.org-id-locations"
+(defcustom org-id-locations-file (convert-standard-filename 
   "The file for remembering the last ID number generated."
   :group 'org-id
   :type 'file)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]