Mercurial > emacs
comparison lisp/pcvs-defs.el @ 94165:aaacbb8c259f
(cvs-diff-ignore-marks, cvs-diff-buffer-name):
Add WHEN to obsolescence declaration.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Fri, 18 Apr 2008 10:31:27 +0000 |
parents | 3e7b6b0c4599 |
children | 40e0e4cdf486 |
comparison
equal
deleted
inserted
replaced
94164:73d630d21dcc | 94165:aaacbb8c259f |
---|---|
140 :group 'pcl-cvs | 140 :group 'pcl-cvs |
141 :type '(boolean)) | 141 :type '(boolean)) |
142 | 142 |
143 (defvar cvs-diff-ignore-marks t) | 143 (defvar cvs-diff-ignore-marks t) |
144 (make-obsolete-variable 'cvs-diff-ignore-marks | 144 (make-obsolete-variable 'cvs-diff-ignore-marks |
145 'cvs-invert-ignore-marks) | 145 'cvs-invert-ignore-marks |
146 "21.1") | |
146 | 147 |
147 (defcustom cvs-invert-ignore-marks | 148 (defcustom cvs-invert-ignore-marks |
148 (let ((l ())) | 149 (let ((l ())) |
149 (unless (equal cvs-diff-ignore-marks cvs-default-ignore-marks) | 150 (unless (equal cvs-diff-ignore-marks cvs-default-ignore-marks) |
150 (push "diff" l)) | 151 (push "diff" l)) |
177 :type '(choice (const :tag "Prompt" nil) | 178 :type '(choice (const :tag "Prompt" nil) |
178 (string))) | 179 (string))) |
179 | 180 |
180 (defvar cvs-diff-buffer-name "*cvs-diff*") | 181 (defvar cvs-diff-buffer-name "*cvs-diff*") |
181 (make-obsolete-variable 'cvs-diff-buffer-name | 182 (make-obsolete-variable 'cvs-diff-buffer-name |
182 'cvs-buffer-name-alist) | 183 'cvs-buffer-name-alist |
184 "21.1") | |
183 | 185 |
184 (defcustom cvs-find-file-and-jump nil | 186 (defcustom cvs-find-file-and-jump nil |
185 "Jump to the modified area when finding a file. | 187 "Jump to the modified area when finding a file. |
186 If non-nil, `cvs-mode-file-file' will place the cursor at the beginning of | 188 If non-nil, `cvs-mode-file-file' will place the cursor at the beginning of |
187 the modified area. If the file is not locally modified, this will obviously | 189 the modified area. If the file is not locally modified, this will obviously |