From 5647599eb441d7cad7b751aeab632be78d31c97d Mon Sep 17 00:00:00 2001
From: Andreas Gerler <baron@bundesbrandschatzamt.de>
Date: Thu, 28 May 2015 19:05:31 +0200
Subject: [PATCH] bind C-c F10 to open configuration file bba.org

Signed-off-by: Andreas Gerler <baron@bundesbrandschatzamt.de>
---
 bba.org | 32 +++++++++++++++-----------------
 1 file changed, 15 insertions(+), 17 deletions(-)

diff --git a/bba.org b/bba.org
index 5a46c2d7..f63c6fcc 100644
--- a/bba.org
+++ b/bba.org
@@ -477,26 +477,24 @@ Define some shortcuts to access major org files.
 #+BEGIN_SRC emacs-lisp
 
 
-    (global-set-key (kbd "C-c <f5>") '(lambda () (interactive) (find-file "~/org/notes.org")))
+  (global-set-key (kbd "C-c <f5>") '(lambda () (interactive) (find-file "~/org/notes.org")))
 
-    (global-set-key (kbd "C-c <f7>") '(lambda () (interactive) (find-file "~/org/private.org")))
+  (global-set-key (kbd "C-c <f7>") '(lambda () (interactive) (find-file "~/org/private.org")))
 
-    (if (equal "work" (getenv "SYSENV"))
-        (progn
-          (global-set-key (kbd "C-c <f6>") '(lambda () (interactive) (find-file "~/workorg/work.org")))
-          (global-set-key (kbd "C-c <f8>") '(lambda () (interactive) (find-file "~/workorg/workhours.org")))
-          )
+  (if (equal "work" (getenv "SYSENV"))
       (progn
-        (global-set-key (kbd "C-c <f6>") '(lambda () (interactive) (find-file "~/org/work.org")))
-        (global-set-key (kbd "C-c <f8>") '(lambda () (interactive) (find-file "~/org/workhours.org")))))
-
-
-
-
-    (global-set-key (kbd "C-c <f9>") '(lambda () (interactive)
-                                        ( if (file-exists-p "~/org/emacs.org")
-                                            (find-file "~/org/emacs.org")
-                                          (find-file "~/.emacs.d/org/emacs.org"))))
+        (global-set-key (kbd "C-c <f6>") '(lambda () (interactive) (find-file "~/workorg/work.org")))
+        (global-set-key (kbd "C-c <f8>") '(lambda () (interactive) (find-file "~/workorg/workhours.org")))
+        )
+    (progn
+      (global-set-key (kbd "C-c <f6>") '(lambda () (interactive) (find-file "~/org/work.org")))
+      (global-set-key (kbd "C-c <f8>") '(lambda () (interactive) (find-file "~/org/workhours.org")))))
+
+  (global-set-key (kbd "C-c <f9>") '(lambda () (interactive)
+                                      ( if (file-exists-p "~/org/emacs.org")
+                                          (find-file "~/org/emacs.org")
+                                        (find-file "~/.emacs.d/org/emacs.org"))))
+  (global-set-key (kbd "C-c <f10>") '(lambda () (interactive) (find-file "~/.emacs.d/bba.org")))
 
 #+END_SRC
 
-- 
2.47.3