display buffer file name via C-c F.

Signed-off-by: Andreas Gerler <baronNOSPAMbundesbrandschatzamt.de>

diff --git a/bba.org b/bba.org
index d4f0fab6ab900d66152a7aa759e36677a184f0f0..5b8c495c90b4a58bcbdc742234d475e2c61bd7b0 100644 (file)
--- a/bba.org
+++ b/bba.org
@@ -1111,6 +1111,10 @@ function to convert groups of spaces to hard tabs.
   (define-key global-map "\M-gb" 'magit-blame-mode)
   (define-key global-map "\C-cm" 'magit-status)
 
+  (define-key global-map "\C-c\S-f" (lambda()
+                                   (interactive)
+                                   (message (buffer-file-name))))
+
   (define-key global-map "\C-cw" (lambda ()
                                    (interactive)
                                    (let ((woman-use-topic-at-point t))