diff options
| author |  Tom Willemse | 2013-08-25 21:09:26 +0200 |
|---|---|---|
| committer | Tom Willemse | 2013-08-25 21:09:26 +0200 |
| commit | 12d3ee93e777330bcf6902ebef65d026ef9393c2 (patch) | |
| tree | 7e416af03f93aafefb0eacad7281a57626205296 /.emacs.d | |
| parent | da5ac6f549164c9b9aba482be767835f2ac784a2 (diff) | |
| download | emacs-12d3ee93e777330bcf6902ebef65d026ef9393c2.tar.gz emacs-12d3ee93e777330bcf6902ebef65d026ef9393c2.zip | |
Throw away some old junk
Diffstat (limited to '.emacs.d')
| -rw-r--r-- | .emacs.d/site-lisp/org-init.el | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/.emacs.d/site-lisp/org-init.el b/.emacs.d/site-lisp/org-init.el index 6c2720b..0894d8b 100644 --- a/.emacs.d/site-lisp/org-init.el +++ b/.emacs.d/site-lisp/org-init.el @@ -45,17 +45,6 @@ (replace-regexp-in-string "-" "_" (replace-regexp-in-string "\\." "" (downcase str)))) -(defun filter-by-agenda (entry) - "Return ENTRY if it has no tags or a tag corresponding to the desktop." - (require 'desktop) - (let ((label (when desktop-dirname - (tagify (file-name-base - (directory-file-name - (expand-file-name desktop-dirname)))))) - (tags (get-text-property 0 'tags entry))) - (when (or (null desktop-dirname) (null tags) (member label tags)) - entry))) - (defun oni:note-template () (concat "* %<%c>\n" @@ -80,7 +69,6 @@ (setq org-agenda-files '("~/documents/org/tasks")) -;; (setq org-agenda-before-sorting-filter-function #'filter-by-agenda) (setq org-agenda-cmp-user-defined (lambda (a b) 1)) (setq org-agenda-prefix-format '((agenda . " %i %-12:c%?-12t% s") |