Mercurial > emacs

diff lisp/org/org-agenda.el @ 108243:be3f6d650654

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Minor cleanups. * org-table.el (orgtbl-setup): * org-agenda.el (org-agenda-entry-text-mode): Simplify. * subr.el (add-minor-mode): Use push. * mail/supercite.el (sc-electric-mode): Use more descriptive arg name. * emulation/edt.el (edt-select-mode): Simplify.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 05 May 2010 00:27:16 -0400
parents 594e81986a75
children 446dbaf86e72
line wrap: on
line diff
--- a/lisp/org/org-agenda.el	Tue May 04 23:45:21 2010 -0400
+++ b/lisp/org/org-agenda.el	Wed May 05 00:27:16 2010 -0400
@@ -5916,9 +5916,8 @@
 (defun org-agenda-entry-text-mode (&optional arg)
   "Toggle entry text mode in an agenda buffer."
   (interactive "P")
-  (if (integerp arg)
-      (setq org-agenda-entry-text-mode t)
-    (setq org-agenda-entry-text-mode (not org-agenda-entry-text-mode)))
+  (setq org-agenda-entry-text-mode (or (integerp arg)
+                                       (not org-agenda-entry-text-mode)))
   (org-agenda-entry-text-hide)
   (and org-agenda-entry-text-mode
        (let ((org-agenda-entry-text-maxlines