X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/078891963d172f00c9866427683e486984d2d0e1..0992ec3b0bfaf98edce1d08462e9ec8e11d6b6e6:/lisp/mh-e/mh-show.el diff --git a/lisp/mh-e/mh-show.el b/lisp/mh-e/mh-show.el index 87b048dbd6..26e821696a 100644 --- a/lisp/mh-e/mh-show.el +++ b/lisp/mh-e/mh-show.el @@ -1,6 +1,6 @@ ;;; mh-show.el --- MH-Show mode -;; Copyright (C) 1993, 1995, 1997, 2000-2013 Free Software Foundation, +;; Copyright (C) 1993, 1995, 1997, 2000-2016 Free Software Foundation, ;; Inc. ;; Author: Bill Wohler @@ -900,7 +900,7 @@ See also `mh-folder-mode'. (interactive) ;; Don't allow Gnus to create buttons while highlighting, maybe this is bad ;; style? - (mh-cl-flet + (mh-flet ((gnus-article-add-button (&rest args) nil)) (let* ((modified (buffer-modified-p)) (gnus-article-buffer (buffer-name))