(cvs-display-full-path, cvs-fileinfo->full-path):

Add WHEN to obsolescence declaration.

1 files changed, 4 insertions, 2 deletions

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."