[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
PCL-CVS: M-x cvs-update vs. key binding in *cvs* buffer
From: |
Reiner Steib |
Subject: |
PCL-CVS: M-x cvs-update vs. key binding in *cvs* buffer |
Date: |
Mon, 20 Aug 2007 21:22:23 +0200 |
User-agent: |
Gnus/5.110007 (No Gnus v0.7) Emacs/22.1.50 (gnu/linux) |
Hi,
`M-x cvs-update RET' prompts for a directory and creates a *cvs*
buffer. Do `M-x cvs-update RET' in the *cvs* buffer. Again, it
prompts for a directory.
Now eval (global-set-key (kbd "C-c v u") 'cvs-update). Then, when
pressing `C-c v u' in the *cvs* buffer, it won't ask for a directory.
I'd expect `cvs-update' to behave the same, no matter how it is called
(M-x vs. key binding).
It seems that `cvs-query-directory' tries to figure out if it was
called via M-x. But I don't quite understand the purpose.
--8<---------------cut here---------------start------------->8---
(defun cvs-query-directory (msg)
;; last-command-char = ?\r hints that the command was run via M-x
(if (and (cvs-buffer-p)
(not current-prefix-arg)
(not (eq last-command-char ?\r)))
default-directory
(read-directory-name msg nil default-directory nil)))
--8<---------------cut here---------------end--------------->8---
Bye, Reiner.
--
,,,
(o o)
---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/
- PCL-CVS: M-x cvs-update vs. key binding in *cvs* buffer,
Reiner Steib <=