/[emacs]/emacs/lisp/vc-mcvs.el
ViewVC logotype

Diff of /emacs/lisp/vc-mcvs.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.19 by ttn, Sat Aug 6 22:13:43 2005 UTC revision 1.20 by rfrancoise, Sat Sep 24 13:44:00 2005 UTC
# Line 225  the Meta-CVS command (in that order)." Line 225  the Meta-CVS command (in that order)."
225      ;; Make sure the `mcvs add' will not fire up the CVSEDITOR      ;; Make sure the `mcvs add' will not fire up the CVSEDITOR
226      ;; to add a rule for the given file's extension.      ;; to add a rule for the given file's extension.
227      (when (and ext (not (assoc ext types)))      (when (and ext (not (assoc ext types)))
228        (let ((type (completing-read "Type to use [default]: "        (let ((type (completing-read "Type to use (default): "
229                                     '("default" "name-only" "keep-old"                                     '("default" "name-only" "keep-old"
230                                       "binary" "value-only")                                       "binary" "value-only")
231                                     nil t nil nil "default")))                                     nil t nil nil "default")))

Legend:
Removed from v.1.19  
changed lines
  Added in v.1.20

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26