(read-file-name-electric-shadow-properties)

(read-file-name-electric-shadow-tty-properties)
(read-file-name-electric-shadow-mode): Remove compatibility defs.

2 files changed, 4 insertions, 19 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bed0849b93f..c957373fa46 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2002-08-28  Miles Bader  <miles@gnu.org>
 
+        * rfn-eshadow.el (read-file-name-electric-shadow-properties)
+        (read-file-name-electric-shadow-tty-properties) 
+        (read-file-name-electric-shadow-mode): Remove compatibility defs.
+
         * comint.el (comint-carriage-motion): Start at START.
 
 2002-08-27  Francesco Potorti`  <pot@gnu.org>
diff --git a/lisp/rfn-eshadow.el b/lisp/rfn-eshadow.el
index 33640e93a84..347881b0cd9 100644
--- a/lisp/rfn-eshadow.el
+++ b/lisp/rfn-eshadow.el
@@ -101,11 +101,6 @@ If emacs is not running under a window system,
 `file-name-shadow-tty-properties' is used instead."
   :type file-name-shadow-properties-custom-type
   :group 'minibuffer)
-;; backwards compatibility
-(make-obsolete-variable 'read-file-name-electric-shadow-properties
-                        'file-name-shadow-properties "21.4")
-(defvaralias 'read-file-name-electric-shadow-properties
-  'file-name-shadow-properties)
 
 ;;;###autoload
 (defcustom file-name-shadow-tty-properties
@@ -116,11 +111,6 @@ is not running under a window-system; if emacs is running under a window
 system, `file-name-shadow-properties' is used instead."
   :type file-name-shadow-properties-custom-type
   :group 'minibuffer)
-;; backwards compatibility
-(make-obsolete-variable 'read-file-name-electric-shadow-tty-properties
-                        'file-name-shadow-tty-properties "21.4")
-(defvaralias 'read-file-name-electric-shadow-tty-properties
-  'file-name-shadow-tty-properties)
 
 (defface file-name-shadow
   '((((background dark))
@@ -229,15 +219,6 @@ Returns non-nil if the new state is enabled."
         (remove-hook 'post-command-hook #'rfn-eshadow-update-overlay t)))
     (setq rfn-eshadow-frobbed-minibufs nil)))
 
-;; backwards compatibility
-(make-obsolete 'read-file-name-electric-shadow-mode 'file-name-shadow-mode
-               "21.4")
-;;;###autoload
-(defalias 'read-file-name-electric-shadow-mode 'file-name-shadow-mode)
-(make-obsolete-variable 'read-file-name-electric-shadow-mode
-                        'file-name-shadow-mode "21.4")
-(defvaralias 'read-file-name-electric-shadow-mode 'file-name-shadow-mode)
-
 
 (provide 'rfn-eshadow)