changeset 110742:f0f8f95b6535

Remove directory-sep-char, obsolete since 21.1. * lisp/subr.el (directory-sep-char): Remove obsolete variable. * lisp/net/tramp-compat.el: Don't mess about with the byte-compiler unless it is "necessary". * doc/lispref/files.texi (File Name Components): Remove ignored section about deleted variable directory-sep-char. * etc/NEWS: Mention above change.
author Glenn Morris <rgm@gnu.org>
date Sun, 03 Oct 2010 14:23:13 -0700
parents d90a3bc6b730
children 9efd09876018
files doc/lispref/ChangeLog doc/lispref/files.texi etc/NEWS lisp/ChangeLog lisp/net/tramp-compat.el lisp/subr.el
diffstat 6 files changed, 19 insertions(+), 27 deletions(-) [+]
line wrap: on
line diff
--- a/doc/lispref/ChangeLog	Sun Oct 03 14:05:47 2010 -0700
+++ b/doc/lispref/ChangeLog	Sun Oct 03 14:23:13 2010 -0700
@@ -1,3 +1,8 @@
+2010-10-03  Glenn Morris  <rgm@gnu.org>
+
+	* files.texi (File Name Components): Remove ignored section about
+	deleted variable directory-sep-char.
+
 2010-10-03  Michael Albinus  <michael.albinus@gmx.de>
 
 	* files.texi (Magic File Names): New defopt
--- a/doc/lispref/files.texi	Sun Oct 03 14:05:47 2010 -0700
+++ b/doc/lispref/files.texi	Sun Oct 03 14:23:13 2010 -0700
@@ -1758,20 +1758,6 @@
 not an extension.
 @end defun
 
-@ignore
-Andrew Innes says that this
-
-@c @defvar directory-sep-char
-This variable holds the character that Emacs normally uses to separate
-file name components.  The default value is @code{?/}, but on MS-Windows
-you can set it to @code{?\\}; then the functions that transform file names
-use backslashes in their output.
-
-File names using backslashes work as input to Lisp primitives even on
-MS-DOS and MS-Windows, even if @code{directory-sep-char} has its default
-value of @code{?/}.
-@end defvar
-@end ignore
 
 @node Relative File Names
 @subsection Absolute and Relative File Names
--- a/etc/NEWS	Sun Oct 03 14:05:47 2010 -0700
+++ b/etc/NEWS	Sun Oct 03 14:23:13 2010 -0700
@@ -559,7 +559,7 @@
 
 ** The following variables and aliases, obsolete since at least Emacs 21.1,
 have been removed:
-checkdoc-minor-keymap, vc-header-alist
+checkdoc-minor-keymap, vc-header-alist, directory-sep-char
 
 
 * Lisp changes in Emacs 24.1
--- a/lisp/ChangeLog	Sun Oct 03 14:05:47 2010 -0700
+++ b/lisp/ChangeLog	Sun Oct 03 14:23:13 2010 -0700
@@ -1,5 +1,9 @@
 2010-10-03  Glenn Morris  <rgm@gnu.org>
 
+	* subr.el (directory-sep-char): Remove obsolete variable.
+	* net/tramp-compat.el: Don't mess about with the byte-compiler unless
+	it is "necessary".
+
 	* vc/vc-hooks.el (vc-header-alist): Remove obsolete variable.
 	* vc/vc.el (vc-static-header-alist): Doc fix.
 	* vc/vc-cvs.el (vc-cvs-header):
--- a/lisp/net/tramp-compat.el	Sun Oct 03 14:05:47 2010 -0700
+++ b/lisp/net/tramp-compat.el	Sun Oct 03 14:23:13 2010 -0700
@@ -88,13 +88,15 @@
   ;; `directory-sep-char' is an obsolete variable in Emacs.  But it is
   ;; used in XEmacs, so we set it here and there.  The following is
   ;; needed to pacify Emacs byte-compiler.
-  (unless (boundp 'byte-compile-not-obsolete-var)
-    (defvar byte-compile-not-obsolete-var nil))
-  (setq byte-compile-not-obsolete-var 'directory-sep-char)
-  ;; Emacs 23.2.
-  (unless (boundp 'byte-compile-not-obsolete-vars)
-    (defvar byte-compile-not-obsolete-vars nil))
-  (setq byte-compile-not-obsolete-vars '(directory-sep-char))
+  ;; Note that it was removed altogether in Emacs 24.1.
+  (when (boundp 'directory-sep-char)
+    (unless (boundp 'byte-compile-not-obsolete-var)
+      (defvar byte-compile-not-obsolete-var nil))
+    (setq byte-compile-not-obsolete-var 'directory-sep-char)
+    ;; Emacs 23.2.
+    (unless (boundp 'byte-compile-not-obsolete-vars)
+      (defvar byte-compile-not-obsolete-vars nil))
+    (setq byte-compile-not-obsolete-vars '(directory-sep-char)))
 
   ;; `remote-file-name-inhibit-cache' has been introduced with Emacs 24.1.
   ;; Besides `t', `nil', and integer, we use also timestamps (as
--- a/lisp/subr.el	Sun Oct 03 14:05:47 2010 -0700
+++ b/lisp/subr.el	Sun Oct 03 14:23:13 2010 -0700
@@ -1092,11 +1092,6 @@
 (make-obsolete 'process-filter-multibyte-p nil "23.1")
 (make-obsolete 'set-process-filter-multibyte nil "23.1")
 
-(defconst directory-sep-char ?/
-  "Directory separator character for built-in functions that return file names.
-The value is always ?/.")
-(make-obsolete-variable 'directory-sep-char "do not use it, just use `/'." "21.1")
-
 (make-obsolete-variable
  'mode-line-inverse-video
  "use the appropriate faces instead."