From: Juanma Barranquero <lekktu@gmail.com>
Date: Fri, 18 Apr 2008 10:31:54 +0000 (+0000)
Subject: (cvs-display-full-path, cvs-fileinfo->full-path):
X-Git-Tag: emacs-pretest-23.0.90~6205
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=82061ebfd74f189a45f1b6a0fa5b9f59343440a6;p=emacs.git

(cvs-display-full-path, cvs-fileinfo->full-path):
Add WHEN to obsolescence declaration.
---

diff --git a/lisp/pcvs-info.el b/lisp/pcvs-info.el
index 33f7c66dcc0..353a55fc6c4 100644
--- a/lisp/pcvs-info.el
+++ b/lisp/pcvs-info.el
@@ -42,7 +42,8 @@
 ;;;; config variables
 ;;;;
 
-(define-obsolete-variable-alias 'cvs-display-full-path 'cvs-display-full-name)
+(define-obsolete-variable-alias 'cvs-display-full-path
+    'cvs-display-full-name "22.1")
 
 (defcustom cvs-display-full-name t
   "*Specifies how the filenames should be displayed in the listing.
@@ -227,7 +228,8 @@ to confuse some users sometimes."
       ;; Here, I use `concat' rather than `expand-file-name' because I want
       ;; the resulting path to stay relative if `dir' is relative.
       (concat dir (cvs-fileinfo->file fileinfo)))))
-(define-obsolete-function-alias 'cvs-fileinfo->full-path 'cvs-fileinfo->full-name)
+(define-obsolete-function-alias 'cvs-fileinfo->full-path
+    'cvs-fileinfo->full-name "22.1")
 
 (defun cvs-fileinfo->pp-name (fi)
   "Return the filename of FI as it should be displayed."