 
 see: %a\n")
         ("n" "Note"
-         entry (file (concat org-directory "belch.org"))
+         entry (file (lambda () (concat org-directory "belch.org")))
          "* %?
 %U\n%a\n")
         ("c" "Clock" item (clock)
          "%?\n%U\n%a")
-        ("C" "Contact" entry (file (concat org-directory "contacts.org"))
+        ("C" "Contact" entry (file (lambda () (concat org-directory "contacts.org")))
          "* %(org-contacts-template-name)
 :PROPERTIES:
 :EMAIL: %(org-contacts-template-email)
 :END:\n")
-        ("b" "Book" entry (file (concat org-directory "lists/books.org"))
+        ("b" "Book" entry (file (lambda () (concat org-directory "lists/books.org")))
          "* %?
 (C-c C-w to refile to fiction/non-fiction)
 see %a

        ("q" "Clock (quick)" plain (clock)
         "%a%?\n")
        ("s" "Emacs tool sharpening"
         entry (file+olp (concat org-directory "programming_notes.org")
                         "Emacs"
                         "Sharpening list")
         "* %?
see %a
entered on %U\n")
        ("S" "General tool sharpening"
         entry (file+olp (concat org-directory "programming_notes.org")
                         "General sharpening")
         "* %?
see %a
entered on %U\n")
        ("d" "Date"
         entry (file+datetree+prompt (concat org-directory "dates.org"))
         "* %?
%t

see %a\n")
        ("j" "Journal"
         plain (file+datetree (concat org-directory "journal.org"))
         "**** <title>\n%U\n\n%?\n")
        ("r" "Dream"
         plain (file+datetree (concat org-directory "dream.org"))
         "%?\n")
        ("e" "Engineering journal"
         plain (file+datetree (concat org-directory "eng_journal.org"))
         "%?\nEntered on %U\n")
        ))



(setq org-capture-templates
      '(("t" "Todo"
         entry (file+headline (lambda () (concat org-directory "organizer.org")) "General")
         "* TODO %?
SCHEDULED: %t
:LOGBOOK:
