From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Denis Bueno" Newsgroups: gmane.emacs.help Subject: Re: Email diary appointment reminders Date: Mon, 30 Apr 2007 21:17:44 -0400 Message-ID: <6dbd4d000704301817o15225fc1gb6f7980f00630228@mail.gmail.com> References: NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1177982300 3752 80.91.229.12 (1 May 2007 01:18:20 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 1 May 2007 01:18:20 +0000 (UTC) Cc: help-gnu-emacs@gnu.org To: "Jeff Miller" Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Tue May 01 03:18:17 2007 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1Hih0P-0005Uu-KE for geh-help-gnu-emacs@m.gmane.org; Tue, 01 May 2007 03:18:13 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Hih6e-0003Eh-4K for geh-help-gnu-emacs@m.gmane.org; Mon, 30 Apr 2007 21:24:40 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Hih6J-00036q-GY for help-gnu-emacs@gnu.org; Mon, 30 Apr 2007 21:24:19 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Hih6E-0002zO-Lh for help-gnu-emacs@gnu.org; Mon, 30 Apr 2007 21:24:18 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Hih6E-0002yf-ER for help-gnu-emacs@gnu.org; Mon, 30 Apr 2007 21:24:14 -0400 Original-Received: from an-out-0708.google.com ([209.85.132.247]) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1Higzy-0005OP-QM for help-gnu-emacs@gnu.org; Mon, 30 Apr 2007 21:17:46 -0400 Original-Received: by an-out-0708.google.com with SMTP id b8so1446825ana for ; Mon, 30 Apr 2007 18:17:45 -0700 (PDT) DKIM-Signature: a=rsa-sha1; c=relaxed/relaxed; d=gmail.com; s=beta; h=domainkey-signature:received:received:message-id:date:from:to:subject:cc:in-reply-to:mime-version:content-type:content-transfer-encoding:content-disposition:references; b=CQtvNAUiSjgcD44AWYmgBKxEV4zDqDMCxIMebUV6HaZHmAs3XRlsdu/ohptV142tELnZdlECFrnG93XDqAUAtKdnRlknltSIWCmiojJXNmEi69mq7BrXzIRsEwB+699BLBHw5EfDvAGEp/H/jgmfiw95e1tjUCL+mg6ZDo5EMvI= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=beta; h=received:message-id:date:from:to:subject:cc:in-reply-to:mime-version:content-type:content-transfer-encoding:content-disposition:references; b=A8SfYWKSjDFhHOutr9AO0hTUM9IAo2WSTzStZ9Jj+GXDzWEFLYL6qSnTZsvFW/dJ2gt6i9Hzdmx6/jS7vZ0imR/Kof82LEBS5XjROYsh281KyCOEidToau1AJxHQShUDlpC/pk50lFM+VbcktphRCxP9kYMXqHfH5kEepbFR2gE= Original-Received: by 10.114.93.17 with SMTP id q17mr2194644wab.1177982264688; Mon, 30 Apr 2007 18:17:44 -0700 (PDT) Original-Received: by 10.114.195.2 with HTTP; Mon, 30 Apr 2007 18:17:44 -0700 (PDT) In-Reply-To: Content-Disposition: inline X-detected-kernel: Linux 2.6 (newer, 2) X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:43426 Archived-At: On 26 Apr 2007 19:46:25 -0400, Jeff Miller wrote: > "Denis Bueno" writes: > > > All- > > > > I am using the diary to keep track of appointments, and in > > particular I use the fancy diary display, and appt-make-list as a > > diary-display-hook, so that I get reminders in emacs of upcoming > > appointments. But I want email reminders. > > > > I'm a bit disappointed that there is nothing like > > "appt-display-hook", so that I could just email myself the > > appointment whenever emacs decides to display it. Is there a way to > > get this behavior? > > > Make use of appt-disp-window-function. > > Here's some code that does that. It's pretty damn crude, but it works > and if nothing else, will get you started. :) > > (defun appt-mail-appt (min-to-app new-time appt-msg) > (compose-mail diary-mail-addr > "Appt notification") > (insert (concat min-to-app " minutes to appointment\n" appt-msg "\n")) > (call-interactively (get mail-user-agent 'sendfunc))) > > (defun jdm-appt-disp (min-to-app new-time appt-msg) > (appt-mail-appt min-to-app new-time appt-msg) > (appt-disp-window min-to-app new-time appt-msg)) > > > (setq appt-disp-window-function 'jdm-appt-disp) Thanks; this works great! -Denis