From 9080baba9141f2512981813264910a566fec436b Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 30 Mar 2005 15:18:09 +0000 Subject: [PATCH] Update maintainer. (appt-buffer-name): Make it a constant. (appt-add): Doc fix. --- lisp/ChangeLog | 4 ++++ lisp/calendar/appt.el | 9 ++++----- 2 files changed, 8 insertions(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2c2a30d3159..535c536b69e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2005-03-30 Glenn Morris + * calendar/cal-x.el (calendar-one-frame-setup) + (calendar-only-one-frame-setup, calendar-two-frame-setup): Use t + rather than 'symbol for set-window-dedicated-p. + * calendar/appt.el (appt-buffer-name): Make it a constant. (appt-add): Doc fix. diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el index e11129414d3..8ace0be910b 100644 --- a/lisp/calendar/appt.el +++ b/lisp/calendar/appt.el @@ -1,9 +1,9 @@ ;;; appt.el --- appointment notification functions -;; Copyright (C) 1989, 1990, 1994, 1998, 2004 Free Software Foundation, Inc. +;; Copyright (C) 1989, 1990, 1994, 1998, 2004 Free Software Foundation, Inc. ;; Author: Neil Mager -;; Maintainer: FSF +;; Maintainer: Glenn Morris ;; Keywords: calendar ;; This file is part of GNU Emacs. @@ -181,7 +181,7 @@ Only relevant if reminders are being displayed in a window." ;;; Internal variables below this point. -(defvar appt-buffer-name " *appt-buf*" +(defconst appt-buffer-name " *appt-buf*" "Name of the appointments buffer.") (defvar appt-time-msg-list nil @@ -486,9 +486,8 @@ Usually just deletes the appointment buffer." ;;;###autoload (defun appt-add (new-appt-time new-appt-msg) - "Add an appointment for the day at NEW-APPT-TIME and issue message NEW-APPT-MSG. + "Add an appointment for today at NEW-APPT-TIME with message NEW-APPT-MSG. The time should be in either 24 hour format or am/pm format." - (interactive "sTime (hh:mm[am/pm]): \nsMessage: ") (unless (string-match "[0-9]?[0-9][:.][0-9][0-9]\\(am\\|pm\\)?" new-appt-time) -- 2.39.2