Browse Source

Apply Stefan's simplification

Carsten Dominik 15 years ago
parent
commit
e3c43d80cd
1 changed files with 2 additions and 3 deletions
  1. 2 3
      lisp/org-agenda.el

+ 2 - 3
lisp/org-agenda.el

@@ -5946,9 +5946,8 @@ so that the date SD will be in that range."
 (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