[Commit-womb] addressbook addressbook.el

[Jose E. Marchesi]

CVSROOT:        /cvsroot/womb
Module name:    addressbook
Changes by:     Jose E. Marchesi <jemarch>      07/05/08 10:41:48

Modified files:
        .              : addressbook.el 

Log message:
        

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/addressbook/addressbook.el?cvsroot=womb&r1=1.20&r2=1.21

Patches:
Index: addressbook.el
===================================================================
RCS file: /cvsroot/womb/addressbook/addressbook.el,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -b -r1.20 -r1.21
--- addressbook.el      8 May 2007 10:39:49 -0000       1.20
+++ addressbook.el      8 May 2007 10:41:48 -0000       1.21
@@ -5,7 +5,7 @@
 ;; Maintainer: Jose E. Marchesi
 ;; Keywords: contacts, applications
 
-;; $Id: addressbook.el,v 1.20 2007/05/08 10:39:49 jemarch Exp $
+;; $Id: addressbook.el,v 1.21 2007/05/08 10:41:48 jemarch Exp $
 
 ;; This file is NOT part of GNU Emacs.
 
@@ -2084,8 +2084,9 @@
     (let ((buffer (get-buffer addrbook-contact-buffer-name)))
       (if (not buffer)
         (let ((show-card-index 0)
-              (user-input (when addrbook-ask-for-search
-                            (read-from-minibuffer "Search for contact [RET 
goes to the summary]: "))))
+              (user-input (if addrbook-ask-for-search
+                              (read-from-minibuffer "Search for contact [RET 
goes to the summary]: ")
+                            "")))
           (unless (addrbook-open)
             (throw 'exit t))
           (addrbook-sort-cards)