On Friday, December 1, 2006 at 17:18:00, Thomas Gerds wrote:
> 
> Adrian Aichner <[EMAIL PROTECTED]> writes:
> 
> > Thomas Gerds <[EMAIL PROTECTED]> writes:
> >
> >> I would like that `bbdb-complete-name' completes also by last
> >> names. googling the topic suggested that one could add the last
> >> name of each entry to the AKA field. however, the following does
> >> not seem to work:
> >
> > Thomas, have you read the documentation of variable
> > bbdb-completion-type
> > and tried to change completion behavior this way?
> 
> yes! the problem is the following: I want to write an email whose
> bbdb name is `Adrian Aichner' however I forgot the first name and
> start writing `Aic' then press tab (which finally calls
> bbdb-complete-name) since the full-name is `Adrian Aichner' the
> string `Aic' is not found.
> 
> I see two possible solutions:
> 
> 1. modify the function bbdb-complete-name such that the hashtable
> which currently is obtained by calling bbdb-hashtable is also
> includes the lastnames. 

You got the idea, but it is not `bbdb-complete-name' which
must/should be modified, it is full of trap and when ever
one tries to modify/fix it bugs are likely to slip in ...

`bbdb-hash-record' must be modified, e.g. 

Index: bbdb.el
===================================================================
RCS file: /cvsroot/bbdb/bbdb/lisp/bbdb.el,v
retrieving revision 1.230
diff -u -r1.230 bbdb.el
--- bbdb.el     9 Oct 2006 22:57:28 -0000       1.230
+++ bbdb.el     15 Dec 2006 18:32:59 -0000
@@ -2147,11 +2147,14 @@
   "Insert the record in the appropriate hashtables.  This must be called
 while the .bbdb buffer is selected."
   (let ((name    (bbdb-record-name-1  record))  ; faster version
+        (lastname (bbdb-record-lastname record))
         (company (bbdb-record-company record))
         (aka     (bbdb-record-aka     record))
         (net     (bbdb-record-net     record)))
     (if (> (length name) 0)
         (bbdb-puthash (downcase name)    record bbdb-hashtable))
+    (if (> (length lastname) 0)
+        (bbdb-puthash (downcase lastname)    record bbdb-hashtable))
     (if (> (length company) 0)
         (bbdb-puthash (downcase company) record bbdb-hashtable))
     (while aka


Bye Robert

-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
bbdb-info@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/bbdb-info
BBDB Home Page: http://bbdb.sourceforge.net/

Reply via email to