emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] Re: Hide file names in agenda view


From: Richard Riley
Subject: [Orgmode] Re: Hide file names in agenda view
Date: Fri, 29 Jan 2010 01:11:41 +0100
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1 (gnu/linux)

Matt Lundin <address@hidden> writes:

> "David A. Gershman" <address@hidden> writes:
>
>> I've been searching a while and thought it'd be simple to find.  How can
>> I suppress the file names in the agenda view?
>>
>> i.e. turn
>>
>>    file2:    7:00- 8:00 alwkjekisdjksj
>>    file1:   10:00-11:00 alsdkfjasdlfkj
>>
>> into
>>
>>     7:00- 8:00 alwkjekisdjksj
>>    10:00-11:00 alsdkfjasdlfkj
>>
>
> This is controlled via the variable org-agenda-prefix-format. You can
> type C-h v org-agenda-prefix-format to get all the details.
>
> Here's very *simple* setting to get rid of file names on all agenda
> views:
>
> (setq org-agenda-prefix-format "%t %s")
>
> - Matt
>


Here's another example posted to this  group a while back.


,----
| 
|   
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|   ;; With this typing "L" in agenda and todo buffers allows toggling
|   ;; whether category/file names appear or not at the left or entries in
|   ;; agenda/todo listings.
|   
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|   
|   (defvar my-org-agenda-list-category t)
|   (defun my-org-agenda-toggle-list-category ()
|    "Toggles whether category/file name appears or not at the left
|     of entries in agenda listings. Useful to unclutter listings."
|     (interactive)
|     (if my-org-agenda-list-category
|         (progn 
|           (setq my-org-agenda-list-category nil)
|           (setq org-agenda-prefix-format
|                 '((agenda  . "  %-12:c%?-12t% s")
|                   (timeline  . "  % s")
|                   (todo  . "  %-12:c")
|                   (tags  . "  %-12:c")
|                   (search . "  %-12:c")))
|           )
|       (setq my-org-agenda-list-category t)
|       (setq org-agenda-prefix-format
|             '((agenda  . "  %?-12t% s")
|               (timeline  . "  % s")
|               (todo  . "  ")
|               (tags  . "  ")
|               (search . "  ")))
|       )
|     (org-agenda-redo))
|   
|   (add-hook 
|    'org-mode-hook
|    (lambda ()
|      (define-key org-agenda-keymap   "L" 'my-org-agenda-toggle-list-category)
|      (define-key org-agenda-mode-map "L" 'my-org-agenda-toggle-list-category)
|    ))
`----





reply via email to

[Prev in Thread] Current Thread [Next in Thread]