[Commit-womb] addressbook addressbook.el

[Jose E. Marchesi]

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

Modified files:
        .              : addressbook.el 

Log message:
        no more addrbook-summary-quit

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

Patches:
Index: addressbook.el
===================================================================
RCS file: /cvsroot/womb/addressbook/addressbook.el,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -b -r1.10 -r1.11
--- addressbook.el      7 May 2007 19:11:31 -0000       1.10
+++ addressbook.el      7 May 2007 19:18:08 -0000       1.11
@@ -5,7 +5,7 @@
 ;; Maintainer: Jose E. Marchesi
 ;; Keywords: contacts, applications
 
-;; $Id: addressbook.el,v 1.10 2007/05/07 19:11:31 jemarch Exp $
+;; $Id: addressbook.el,v 1.11 2007/05/07 19:18:08 jemarch Exp $
 
 ;; This file is NOT part of GNU Emacs.
 
@@ -1539,11 +1539,6 @@
         (addrbook-contact-display-card card-index)))
     (addrbook-show-contact)))
 
-(defun addrbook-summary-quit ()
-  "Close the addressbook"
-  (interactive)
-  (addrbook-quit))
-
 ;; Modeline management
 
 (defun addrbook-summary-set-mode-line (card-number total-cards)
@@ -1570,7 +1565,7 @@
   (define-key addrbook-summary-mode-map "n" 'addrbook-summary-next-contact)
   (define-key addrbook-summary-mode-map "p" 'addrbook-summary-previous-contact)
   (define-key addrbook-summary-mode-map "h" 'addrbook-summary-show-contact)
-  (define-key addrbook-summary-mode-map "q" 'addrbook-summary-quit)
+  (define-key addrbook-summary-mode-map "q" 'addrbook-quit)
   (define-key addrbook-summary-mode-map "m" 'addrbook-send-email)
   (use-local-map addrbook-summary-mode-map)
   (setq mode-name "AddressBook Summary")