summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2016-02-13 15:45:55 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2016-02-17 22:49:19 +0100
commit3196b1434289c9427704f0eccc074f7d5901715a (patch)
tree6b04c431c68029f0a8cab325aa864d13c57db823
parent4eada95883fdfa89c0786aa054cf232917180310 (diff)
downloadorg-mode-3196b1434289c9427704f0eccc074f7d5901715a.tar.gz
Make `org-agenda-view-columns-initially' a defcustom
* lisp/org-agenda.el (org-agenda-view-columns-initially): New variable,
-rw-r--r--etc/ORG-NEWS2
-rw-r--r--lisp/org-agenda.el8
-rw-r--r--lisp/org-colview.el4
3 files changed, 11 insertions, 3 deletions
diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS
index 6322ad2..47c5479 100644
--- a/etc/ORG-NEWS
+++ b/etc/ORG-NEWS
@@ -208,6 +208,8 @@ When defining a "columnview" dynamic block, it is now possible to add
an :indent parameter, much like the one in the clock table.
On the other hand, stars no longer appear in an ITEM field.
+*** New variable : ~org-agenda-view-columns-initially~
+The variable used to be a ~defvar~, it is now a ~defcustom~.
*** Preview LaTeX snippets in buffers not visiting files
*** New option ~org-attach-commit~
When non-nil, commit attachments with git, assuming the document is in
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index b2fd56f..86ba2f9 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -1950,6 +1950,14 @@ category, you can use:
:tag "Org Agenda Column View"
:group 'org-agenda)
+(defcustom org-agenda-view-columns-initially nil
+ "When non-nil, switch to columns view right after creating the agenda."
+ :group 'org-agenda-column-view
+ :type 'boolean
+ :version "25.1"
+ :package-version '(Org . "9.0")
+ :safe #'booleanp)
+
(defcustom org-agenda-columns-show-summaries t
"Non-nil means show summaries for columns displayed in the agenda view."
:group 'org-agenda-column-view
diff --git a/lisp/org-colview.el b/lisp/org-colview.el
index 38e2510..1c1fc6a 100644
--- a/lisp/org-colview.el
+++ b/lisp/org-colview.el
@@ -1387,9 +1387,7 @@ and tailing newline characters."
;;; Column view in the agenda
-(defvar org-agenda-view-columns-initially nil
- "When set, switch to columns view immediately after creating the agenda.")
-
+(defvar org-agenda-view-columns-initially)
(defvar org-agenda-columns-show-summaries) ; defined in org-agenda.el
(defvar org-agenda-columns-compute-summary-properties); defined in org-agenda.el
(defvar org-agenda-columns-add-appointments-to-effort-sum); as well