[ELPA-diffs] /srv/bzr/emacs/elpa r310: hook into dired

[Sam Steingold]

------------------------------------------------------------
revno: 310
committer: Sam Steingold <address@hidden>
branch nick: elpa
timestamp: Thu 2012-11-29 14:56:52 -0500
message:
  hook into dired
modified:
  packages/vlf/vlf.el

=== modified file 'packages/vlf/vlf.el'
--- a/packages/vlf/vlf.el       2012-06-17 05:01:56 +0000
+++ b/packages/vlf/vlf.el       2012-11-29 19:56:52 +0000
@@ -147,6 +147,13 @@
     (vlf-mode)
     (display-buffer (current-buffer))))
 
+(defun dired-vlf ()
+  "In Dired, visit the file on this line in VLF mode."
+  (interactive)
+  (vlf (dired-get-file-for-visit)))
+
+(eval-after-load "dired" '(define-key dired-mode-map "V" 'dired-vlf))
+
 (provide 'vlf)
 
 ;;; vlf.el ends here