diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-02-13 12:21:08 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-02-17 22:49:19 +0100 |
commit | 4eada95883fdfa89c0786aa054cf232917180310 (patch) | |
tree | 8cdfde08b7f36edd240af87803e514fe7f9d9931 | |
parent | a5540c5599c85e6c003f06c4ab70b8c2ab83016c (diff) | |
download | org-mode-4eada95883fdfa89c0786aa054cf232917180310.tar.gz |
Move `org-columns-modify-value-for-display-function'
* lisp/org.el (org-columns-modify-value-for-display-function): Move from
here...
* lisp/org-colview.el (org-columns-modify-value-for-display-function):
... to here.
-rw-r--r-- | lisp/org-colview.el | 15 | ||||
-rw-r--r-- | lisp/org.el | 13 |
2 files changed, 15 insertions, 13 deletions
diff --git a/lisp/org-colview.el b/lisp/org-colview.el index a90c803..38e2510 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -35,6 +35,21 @@ (declare-function org-agenda-do-context-action "org-agenda" ()) (declare-function org-clock-sum-today "org-clock" (&optional headline-filter)) +;;; Configuration + +(defcustom org-columns-modify-value-for-display-function nil + "Function that modifies values for display in column view. +For example, it can be used to cut out a certain part from a time stamp. +The function must take 2 arguments: + +column-title The title of the column (*not* the property name) +value The value that should be modified. + +The function should return the value that should be displayed, +or nil if the normal value should be used." + :group 'org-properties + :type '(choice (const nil) (function))) + ;;; Column View (defvar org-columns-overlays nil diff --git a/lisp/org.el b/lisp/org.el index 5fcafd4..11a30c8 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -3737,19 +3737,6 @@ ellipses string, only part of the ellipses string will be shown." :group 'org-properties :type 'string) -(defcustom org-columns-modify-value-for-display-function nil - "Function that modifies values for display in column view. -For example, it can be used to cut out a certain part from a time stamp. -The function must take 2 arguments: - -column-title The title of the column (*not* the property name) -value The value that should be modified. - -The function should return the value that should be displayed, -or nil if the normal value should be used." - :group 'org-properties - :type '(choice (const nil) (function))) - (defconst org-global-properties-fixed '(("VISIBILITY_ALL" . "folded children content all") ("CLOCK_MODELINE_TOTAL_ALL" . "current today repeat all auto")) |