Index: emacs/lisp/mh-e/mh-acros.el
diff -c emacs/lisp/mh-e/mh-acros.el:1.6 emacs/lisp/mh-e/mh-acros.el:1.7
*** emacs/lisp/mh-e/mh-acros.el:1.6 Wed May 18 11:01:20 2005
--- emacs/lisp/mh-e/mh-acros.el Sat May 28 22:04:54 2005
***************
*** 1,6 ****
;;; mh-acros.el --- Macros used in MH-E
! ;; Copyright (C) 2005 Free Software Foundation, Inc.
;; Author: Satyaki Das <[EMAIL PROTECTED]>
;; Maintainer: Bill Wohler <[EMAIL PROTECTED]>
--- 1,6 ----
;;; mh-acros.el --- Macros used in MH-E
! ;; Copyright (C) 2004 Free Software Foundation, Inc.
;; Author: Satyaki Das <[EMAIL PROTECTED]>
;; Maintainer: Bill Wohler <[EMAIL PROTECTED]>
***************
*** 40,45 ****
--- 40,46 ----
;;; Code:
(require 'cl)
+ (require 'advice)
;; The Emacs coding conventions require that the cl package not be required at
;; runtime. However, the cl package in versions of Emacs prior to 21.4 left cl
***************
*** 68,75 ****
(defmacro mh-funcall-if-exists (function &rest args)
"Call FUNCTION with ARGS as parameters if it exists."
! (if (fboundp function)
! `(funcall ',function ,@args)))
(defmacro mh-make-local-hook (hook)
"Make HOOK local if needed.
--- 69,77 ----
(defmacro mh-funcall-if-exists (function &rest args)
"Call FUNCTION with ARGS as parameters if it exists."
! (when (fboundp function)
! `(when (fboundp ',function)
! (funcall ',function ,@args))))
(defmacro mh-make-local-hook (hook)
"Make HOOK local if needed.
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
