Mercurial > emacs

diff lisp/mh-e/mh-letter.el @ 95843:c0e61b43cdb0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Check tool-bar-map is bound.
author Glenn Morris <rgm@gnu.org>
date Thu, 12 Jun 2008 03:57:56 +0000
parents 2f24e9c3eb6b
children a9dc0e7c3f2b
line wrap: on
line diff
--- a/lisp/mh-e/mh-letter.el	Thu Jun 12 03:57:36 2008 +0000
+++ b/lisp/mh-e/mh-letter.el	Thu Jun 12 03:57:56 2008 +0000
@@ -1,7 +1,7 @@
 ;;; mh-letter.el --- MH-Letter mode
 
-;; Copyright (C) 1993, 1995, 1997,
-;;  2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc.
+;; Copyright (C) 1993, 1995, 1997, 2000, 2001, 2002, 2003, 2004, 2005,
+;;  2006, 2007, 2008  Free Software Foundation, Inc.
 
 ;; Author: Bill Wohler <wohler@newt.com>
 ;; Maintainer: Bill Wohler <wohler@newt.com>
@@ -310,7 +310,8 @@
   (mh-do-in-gnu-emacs
     (unless mh-letter-tool-bar-map
       (mh-tool-bar-letter-buttons-init))
-    (set (make-local-variable 'tool-bar-map) mh-letter-tool-bar-map))
+    (if (boundp 'tool-bar-map)
+        (set (make-local-variable 'tool-bar-map) mh-letter-tool-bar-map)))
   (mh-do-in-xemacs
     (mh-tool-bar-init :letter))
   ;; Set the local value of mh-mail-header-separator according to what is