URL:
<http://savannah.nongnu.org/patch/?func=detailitem&item_id=4603>
Summary: Create variable to hold the name of the
'WelcomePage' instead of hardcoding that string.
Project: emacs-wiki, planner, and related modules
Submitted by: None
Submitted on: Tue 11/08/05 at 00:14
Category: None
Priority: 5 - Normal
Status: None
Privacy: Public
Assigned to: None
Originator Email: [EMAIL PROTECTED]
Open/Closed: Open
_______________________________________________________
Details:
--- old/planner.el 2005-11-07 19:13:49.190359012 -0500
+++ new/planner.el 2005-11-07 19:14:00.788991059 -0500
@@ -437,6 +437,11 @@
:type 'boolean
:group 'planner)
+(defcustom planner-welcome-page-name "WelcomePage"
+ "The name of the default page when day pages are not used."
+ :type 'string
+ :group 'planner)
+
(defcustom planner-mode-hook nil
"A hook for Planner mode."
:type 'hook
@@ -1230,7 +1235,7 @@
"Return the filename of the current date."
(if planner-use-day-pages
(or planner-timewarp-date (planner-date-to-filename (decode-time
(current-time))))
- "WelcomePage"))
+ planner-welcome-page-name))
(defun planner-date-to-filename (date)
"Return the planner filename corresponding to DATE.
@@ -3105,7 +3110,7 @@
;; Save/kill files if configured to do so
(when planner-tasks-file-behavior
(planner-save-buffers live-buffers))))
- (planner-find-file "WelcomePage")))
+ (planner-find-file planner-welcome-page-name)))
(defvar planner-goto-hook '(planner-seek-to-first)
"Functions called after a planner page is opened.")
_______________________________________________________
Carbon-Copy List:
CC Address | Comment
------------------------------------+-----------------------------
damned --AT-- theworld --DOT-- com | Originator Email
_______________________________________________________
Reply to this item at:
<http://savannah.nongnu.org/patch/?func=detailitem&item_id=4603>
_______________________________________________
Message sent via/by Savannah
http://savannah.nongnu.org/
_______________________________________________
emacs-wiki-discuss mailing list
emacs-wiki-discuss@nongnu.org
http://lists.nongnu.org/mailman/listinfo/emacs-wiki-discuss
