From fb84607dacc3d5d4d6941618450b4c1dc7809a7e Mon Sep 17 00:00:00 2001 From: morioka Date: Tue, 21 Oct 1997 16:55:04 +0000 Subject: [PATCH] (mime-setup-set-signature-key): Check local keymap is exist or not to fix problem about `gnus-summary-resend-message'. --- semi-setup.el | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) diff --git a/semi-setup.el b/semi-setup.el index 1eecdbb..1d5bb62 100644 --- a/semi-setup.el +++ b/semi-setup.el @@ -3,7 +3,7 @@ ;; Copyright (C) 1994,1995,1996,1997 Free Software Foundation, Inc. ;; Author: MORIOKA Tomohiko -;; Version: $Id: semi-setup.el,v 0.16 1997-03-18 13:06:09 morioka Exp $ +;; Version: $Id: semi-setup.el,v 0.17 1997-10-21 16:55:04 morioka Exp $ ;; Keywords: mail, news, MIME, multimedia, multilingual, encoded-word ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). @@ -99,10 +99,13 @@ ;;; (defun mime-setup-set-signature-key () - (let ((key (or (cdr (assq major-mode mime-setup-signature-key-alist)) - mime-setup-default-signature-key))) - (define-key (current-local-map) key (function insert-signature)) - )) + (let ((keymap (current-local-map))) + (if keymap + (let ((key + (or (cdr (assq major-mode mime-setup-signature-key-alist)) + mime-setup-default-signature-key))) + (define-key keymap key (function insert-signature)) + )))) (if mime-setup-use-signature (progn -- 1.7.10.4