Subject: Re: bug#6490: 24.0.50; src/lread.c: old style backquote bug?

From: Makoto Fujiwara <[email-masked]>
Date: Mon, 05 Jul 2010 10:51:21 +0900

Just for an information:

bbdb
  http://sourceforge.net/projects/bbdb
has the following lines in bbdb-2.34/lisp/bbdb-mhe.el:
     -----
     38 (defmacro bbdb/mh-cache-key (message)
     39   "Return a (numeric) key for MESSAGE"
     40   (`(let* ((attrs (file-attributes (, message)))
     41            (status-time (nth 6 attrs))
     42            (status-time-2 (cdr status-time))
     43            (inode (nth 10 attrs)))
     -----
I have added '(' at the end of the line, and then make it.

diff --git a/src/lread.c b/src/lread.c
index 16efd71..656d367 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2693,21 +2693,26 @@ read1 (readcharfun, pch, first_in_list)
...

+       if (first_in_list && (ch == ' ' || ch == '\t' || ch == '\n' || ch == '\r' || ch == '\f' || ch == '('))

---
Makoto Fujiwara, 
Chiba, Japan, Narita Airport and Disneyland prefecture.