88 |
|
|
89 |
(make-obsolete-variable 'appt-issue-message |
(make-obsolete-variable 'appt-issue-message |
90 |
"use the function `appt-activate', and the \ |
"use the function `appt-activate', and the \ |
91 |
variable `appt-display-format' instead." "21.4") |
variable `appt-display-format' instead." "22.1") |
92 |
|
|
93 |
;;;###autoload |
;;;###autoload |
94 |
(defcustom appt-message-warning-time 12 |
(defcustom appt-message-warning-time 12 |
109 |
:type 'boolean |
:type 'boolean |
110 |
:group 'appt) |
:group 'appt) |
111 |
|
|
112 |
(make-obsolete-variable 'appt-visible 'appt-display-format "21.4") |
(make-obsolete-variable 'appt-visible 'appt-display-format "22.1") |
113 |
|
|
114 |
;;;###autoload |
;;;###autoload |
115 |
(defcustom appt-msg-window t |
(defcustom appt-msg-window t |
118 |
:type 'boolean |
:type 'boolean |
119 |
:group 'appt) |
:group 'appt) |
120 |
|
|
121 |
(make-obsolete-variable 'appt-msg-window 'appt-display-format "21.4") |
(make-obsolete-variable 'appt-msg-window 'appt-display-format "22.1") |
122 |
|
|
123 |
;; TODO - add popup. |
;; TODO - add popup. |
124 |
(defcustom appt-display-format 'ignore |
(defcustom appt-display-format 'ignore |
136 |
(const :tag "Echo-area" echo) |
(const :tag "Echo-area" echo) |
137 |
(const :tag "No visible display" nil)) |
(const :tag "No visible display" nil)) |
138 |
:group 'appt |
:group 'appt |
139 |
:version "21.4") |
:version "22.1") |
140 |
|
|
141 |
;;;###autoload |
;;;###autoload |
142 |
(defcustom appt-display-mode-line t |
(defcustom appt-display-mode-line t |