X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Friece-lsdb.el;h=eae8c44e0bd9b3fa75dbc81aae8df4d796f5ee8a;hb=a5ca9b7f8d8d7c92e2a5695b2a4d5bcd93e75e29;hp=17ee802a815a49ba294693ac214f9773133ea13d;hpb=ac6f509f792c178679fdc4c91a13efeceace607c;p=elisp%2Friece.git diff --git a/lisp/riece-lsdb.el b/lisp/riece-lsdb.el index 17ee802..eae8c44 100644 --- a/lisp/riece-lsdb.el +++ b/lisp/riece-lsdb.el @@ -19,8 +19,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Commentary: @@ -42,8 +42,6 @@ (defvar riece-lsdb-cache nil) -(defvar riece-lsdb-enabled nil) - (defconst riece-lsdb-description "Help register nicknames in LSDB rolodex program.") @@ -140,15 +138,13 @@ (define-key riece-command-mode-map "\C-c\C-ll" 'riece-lsdb-display-records) (define-key riece-command-mode-map - "\C-c\C-la" 'riece-lsdb-add-user) - (setq riece-lsdb-enabled t)) + "\C-c\C-la" 'riece-lsdb-add-user)) (defun riece-lsdb-disable () (define-key riece-command-mode-map "\C-c\C-ll" nil) (define-key riece-command-mode-map - "\C-c\C-la" nil) - (setq riece-lsdb-enabled nil)) + "\C-c\C-la" nil)) (provide 'riece-lsdb)