From mboxrd@z Thu Jan 1 00:00:00 1970 From: Marco Wahl Subject: Re: (org-agenda-to-appt) with sexp org-diary-class entry? Date: Mon, 08 Dec 2014 16:07:14 +0100 Message-ID: <84oarefae5.fsf@tm6592.fritz.box> References: <87mw6zw1fm.fsf@jnanam.net> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:52265) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XxzuU-0000k8-Ad for emacs-orgmode@gnu.org; Mon, 08 Dec 2014 10:07:44 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XxzuO-0004kQ-Ft for emacs-orgmode@gnu.org; Mon, 08 Dec 2014 10:07:38 -0500 Received: from plane.gmane.org ([80.91.229.3]:49893) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XxzuO-0004jv-9P for emacs-orgmode@gnu.org; Mon, 08 Dec 2014 10:07:32 -0500 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1XxzuM-000756-G0 for emacs-orgmode@gnu.org; Mon, 08 Dec 2014 16:07:30 +0100 Received: from stgt-4d02f48c.pool.mediaways.net ([77.2.244.140]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 08 Dec 2014 16:07:30 +0100 Received: from marcowahlsoft by stgt-4d02f48c.pool.mediaways.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 08 Dec 2014 16:07:30 +0100 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org Hi Benjamin, > Thanks, Marco. Well, it at least helps to update me to a non-obsolete > sexp method. > > I have no idea how to check what's actually been pushed to `appt` to see > whether the updated org-class really behaves differently to > org-diary-class in this respect. (So I'll have to see tomorrow how > `appt` behaves.) You can use M-x appt-delete for scanning through your current appointments. For each appointment you will be asked for deletion. Saying 'no' just keeps the appointment. You might even look at variable `appt-time-msg-list' or use the following function to see a list of your current appointments. #v+ (defun mw-appt-display-list () "List the current appointments. This is an amendment to the appt-family of functions. Sometimes you might want to know the upcoming appts." (interactive) (if (not (boundp 'appt-time-msg-list)) (message "`appt-time-msg-list' not even bound. Consider M-x org-agenda-to-appt.") (if appt-time-msg-list (let ((tmp-msg-list appt-time-msg-list) (message-string "")) (dolist (element tmp-msg-list) (setq message-string (concat message-string (prin1-to-string (substring-no-properties (cadr element) 0)) "\n"))) (if (< 0 (length message-string)) (message (substring message-string 0 -1)))) (message "No appts scheduled for today.")))) #v- Best wishes, Marco -- http://www.wahlzone.de GPG: 0x49010A040A3AE6F2