Babel Library¶
to load a
(org-babel-lob-ingest "~/git/.emacs.d/yi.babel.org)
org-contact¶
(defun GetContactGroup (contact-file search-tag contact-type)
(interactive)
(let ((name-address (org-map-entries (lambda()
(cons (elt (org-heading-components) 4) ;; get headline (name)
(org-entry-get nil contact-type))) ;; get Email/phone etc property
search-tag
contact-file)))
(mapconcat (lambda (a-list)
(concat (car a-list) " <" (cdr a-list) ">"))
name-address ", ")))
(GetContactGroup contact-file search-tag contact-type)
Ledger¶
add the following to .ledgerrc
--start-of-week=1 -f ~/git/ImportantFiles/ledger
ledger --period "this week" org register Exp -S "date, amount"
ledger --period "this week" bal Exp
#+call: Weekly_Transaction()
2015-04-06 GiffGaff Expenses:Bill:Phone £ 10.00 £ 10.00
2015-04-06 Tesco Expenses:Food:Grocery £ 15.25 £ 25.25
2015-04-08 HS Expenses:Transport £ 4.20 £ 29.45
2015-04-08 Tesco Expenses:Food:Grocery £ 14.11 £ 43.56
2015-04-10 HS Expenses:Food:Lunch £ 2.50 £ 46.06
2015-04-10 Tesco Expenses:Speical:Cig £ 5.48 £ 51.54
15-Apr-06 GiffGaff Expenses:Bill:Phone £ 10.00 £ 10.00
15-Apr-06 Tesco Expenses:Food:Grocery £ 15.25 £ 25.25
15-Apr-08 HS Expenses:Transport £ 4.20 £ 29.45
15-Apr-08 Tesco Expenses:Food:Grocery £ 14.11 £ 43.56
15-Apr-10 HS Expenses:Food:Lunch £ 2.50 £ 46.06
15-Apr-10 Tesco Expenses:Speical:Cig £ 5.48 £ 51.54