From mboxrd@z Thu Jan 1 00:00:00 1970 From: Jambunathan K Subject: [PATCH] org-bbdb: Be lenient. Ignore case in anniv class string. Date: Mon, 09 Aug 2010 09:02:07 +0530 Message-ID: <814of4wjew.fsf@gmail.com> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from [140.186.70.92] (port=36282 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OiJ65-0005fm-Tb for emacs-orgmode@gnu.org; Sun, 08 Aug 2010 23:32:22 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OiJ64-0007ze-VE for emacs-orgmode@gnu.org; Sun, 08 Aug 2010 23:32:21 -0400 Received: from mail-pw0-f41.google.com ([209.85.160.41]:44503) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OiJ64-0007zQ-QN for emacs-orgmode@gnu.org; Sun, 08 Aug 2010 23:32:20 -0400 Received: by pwj7 with SMTP id 7so2542315pwj.0 for ; Sun, 08 Aug 2010 20:32:19 -0700 (PDT) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --=-=-= Permit bbdb entries like '1973-06-22 Birthday'. i.e., Ignore the case of anniv class. ps: Have I mixed up tabs/spaces and/or indentations? Kindly point me to the emacs settings for editing org elisp files. --=-=-= Content-Disposition: inline Content-Description: org-bbdb.patch >From 8ca5dcf3dbc8fed1cdba105f0f15513c04e289a2 Mon Sep 17 00:00:00 2001 From: Jambunathan K Date: Mon, 9 Aug 2010 08:44:44 +0530 Subject: [PATCH] org-bbdb: Be lenient. Ignore case in anniv class string. 2010-08-09 Jambunathan K * org-bbdb.el (org-bbdb-anniversaries): Ignore case while looking up org-bbdb-anniversary-format-alist. TINYCHANGE --- lisp/org-bbdb.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/org-bbdb.el b/lisp/org-bbdb.el index a86091e..59cec32 100644 --- a/lisp/org-bbdb.el +++ b/lisp/org-bbdb.el @@ -322,8 +322,8 @@ This is used by Org to re-create the anniversary hash table." (when rec (let* ((class (or (nth 2 rec) org-bbdb-default-anniversary-format)) - (form (or (cdr (assoc class - org-bbdb-anniversary-format-alist)) + (form (or (cdr (assoc-ignore-case + class org-bbdb-anniversary-format-alist)) class)) ; (as format string) (name (nth 1 rec)) (years (- y (car rec))) -- 1.7.0.4 --=-=-= Jambunathan K. --=-=-= Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-orgmode mailing list Please use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode --=-=-=--