/[emacs]/emacs/lisp/calendar/cal-x.el
ViewVC logotype

Diff of /emacs/lisp/calendar/cal-x.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13 by eliz, Mon Apr 23 14:20:55 2001 UTC revision 1.13.16.1 by miles, Fri Apr 4 06:20:15 2003 UTC
# Line 42  Line 42 
42  (defvar calendar-frame nil "Frame in which to display the calendar.")  (defvar calendar-frame nil "Frame in which to display the calendar.")
43    
44  (defvar diary-frame nil "Frame in which to display the diary.")  (defvar diary-frame nil "Frame in which to display the diary.")
45      
46  ;; This should not specify the font.  That's up to the user.  ;; This should not specify the font.  That's up to the user.
47  ;; Certainly it should not specify auto-lower and auto-raise  ;; Certainly it should not specify auto-lower and auto-raise
48  ;; since most users won't like that.  ;; since most users won't like that.
# Line 51  Line 51 
51      (unsplittable . t) (minibuffer . nil))      (unsplittable . t) (minibuffer . nil))
52    "Parameters of the diary frame, if the diary is in its own frame.    "Parameters of the diary frame, if the diary is in its own frame.
53  Location and color should be set in .Xdefaults.")  Location and color should be set in .Xdefaults.")
54                                    
55  (defvar calendar-frame-parameters  (defvar calendar-frame-parameters
56    '((name . "Calendar") (title . "Calendar") (minibuffer . nil)    '((name . "Calendar") (title . "Calendar") (minibuffer . nil)
57      (height . 10) (width . 80) (unsplittable . t) (vertical-scroll-bars . nil))      (height . 10) (width . 80) (unsplittable . t) (vertical-scroll-bars . nil))
# Line 63  Location and color should be set in .Xde Line 63  Location and color should be set in .Xde
63      (minibuffer . nil))      (minibuffer . nil))
64    "Parameters of the frame that displays both the calendar and the diary.    "Parameters of the frame that displays both the calendar and the diary.
65  Location and color should be set in .Xdefaults.")  Location and color should be set in .Xdefaults.")
66      
67  (defvar calendar-after-frame-setup-hooks nil  (defvar calendar-after-frame-setup-hooks nil
68    "Hooks to be run just after setting up a calendar frame.    "Hooks to be run just after setting up a calendar frame.
69  Can be used to change frame parameters, such as font, color, location, etc.")  Can be used to change frame parameters, such as font, color, location, etc.")
70      
71  (defun calendar-one-frame-setup (&optional arg)  (defun calendar-one-frame-setup (&optional arg)
72    "Start calendar and display it in a dedicated frame together with the diary."    "Start calendar and display it in a dedicated frame together with the diary."
73    (if (not (display-multi-frame-p))    (if (not (display-multi-frame-p))

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.13.16.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26