emacs-orgmode
[Top][All Lists]
Advanced

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

Re: [Orgmode] Increase width in agenda view?


From: Manish
Subject: Re: [Orgmode] Increase width in agenda view?
Date: Tue, 20 Apr 2010 19:28:05 +0530

On Mon, Apr 19, 2010 at 10:19 PM, Johan Ekh wrote:
> Hi all, is it possible to increase the width in the Week-agenda
> view such that the TODO keyword and the title task text get
> more space? My tags to the right of the title text gets
> misaligned if the title text is too long.

If you are okay with hiding CATEGORY then you can try the following
hack from Manuel Hermenegildo[fn:1]

--8<---------------cut here---------------start------------->8---
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; 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))
(my-org-agenda-toggle-list-category)

(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)
 ))
--8<---------------cut here---------------end--------------->8---

Regards
-- 
Manish

Footnotes:
[fn:1] http://article.gmane.org/gmane.emacs.orgmode/10909




reply via email to

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