Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
a544e7c1
Commit
a544e7c1
authored
Apr 12, 2010
by
Stefan Monnier
Browse files
(vc-dir-kill-line): New command.
(vc-dir-mode-map): Bind it to C-k.
parent
a1979d8e
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
11 additions
and
0 deletions
+11
-0
lisp/ChangeLog
lisp/ChangeLog
+3
-0
lisp/vc-dir.el
lisp/vc-dir.el
+8
-0
No files found.
lisp/ChangeLog
View file @
a544e7c1
2010-04-12 Stefan Monnier <monnier@iro.umontreal.ca>
* vc-dir.el (vc-dir-kill-line): New command.
(vc-dir-mode-map): Bind it to C-k.
* bookmark.el (bookmark-insert-location): Handle a nil filename.
* woman.el: Add bookmark declarations to silence the compiler.
...
...
lisp/vc-dir.el
View file @
a544e7c1
...
...
@@ -263,6 +263,7 @@ See `run-hooks'."
(define-key map [mouse-2] 'vc-dir-toggle-mark)
(define-key map [follow-link] 'mouse-face)
(define-key map "
x
" 'vc-dir-hide-up-to-date)
(define-key map [?\C-k] 'vc-dir-kill-line)
(define-key map "
S
" 'vc-dir-search) ;; FIXME: Maybe use A like dired?
(define-key map "
Q
" 'vc-dir-query-replace-regexp)
(define-key map (kbd "
M-s
a
C-s
") 'vc-dir-isearch)
...
...
@@ -1088,6 +1089,13 @@ outside of VC) and one wants to do some operation on it."
(ewoc-delete vc-ewoc crt))
(setq crt prev)))))
(defun vc-dir-kill-line ()
"
Remove
the
current
line
from
display.
"
(interactive)
(let ((crt (ewoc-locate vc-ewoc))
(inhibit-read-only t))
(ewoc-delete vc-ewoc crt)))
(defun vc-dir-printer (fileentry)
(vc-call-backend vc-dir-backend 'dir-printer fileentry))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment