From 2eeb05712229632a7741e6ed1948360c85355e02 Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Tue, 31 Jul 2018 14:12:49 +0200 Subject: [PATCH] =?UTF-8?q?[Timeline]=20Don=E2=80=99t=20make=20time=20form?= =?UTF-8?q?ats=20customizable?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit One can overwrite them using standard dynamic binding. --- site-lisp/timeline-tools.el | 18 ++++++------------ 1 file changed, 6 insertions(+), 12 deletions(-) diff --git a/site-lisp/timeline-tools.el b/site-lisp/timeline-tools.el index 0540992..ba6d7cd 100644 --- a/site-lisp/timeline-tools.el +++ b/site-lisp/timeline-tools.el @@ -32,18 +32,6 @@ Filter are applied in the order they are given in this list." :group 'timeline-tools :type '(list function)) -(defcustom timeline-tools-headline-time-format - "%Y-%m-%d %H:%M" - "Format of time used in the headline of a timeline." - :group 'timeline-tools - :type 'string) - -(defcustom timeline-tools-time-format - "%Y-%m-%d %H:%M" - "Format of time used inside a timeline" - :group 'timeline-tools - :type 'string) - ;; Mode definition @@ -59,6 +47,12 @@ Filter are applied in the order they are given in this list." (defvar timeline-tools--current-timeline nil "Currently displayed timeline in abstract form.") +(defvar timeline-tools-headline-time-format "%Y-%m-%d %H:%M" + "Format of time used in the headline of a timeline.") + +(defvar timeline-tools-time-format "%Y-%m-%d %H:%M" + "Format of time used inside a timeline") + (defvar timeline-tools-mode-map (let ((map (make-sparse-keymap))) (define-key map [remap self-insert-command] 'undefined)