diff options
Diffstat (limited to 'lisp/progmodes/ebrowse.el')
| -rw-r--r-- | lisp/progmodes/ebrowse.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/progmodes/ebrowse.el b/lisp/progmodes/ebrowse.el index 865211d109c..80f9e2a7719 100644 --- a/lisp/progmodes/ebrowse.el +++ b/lisp/progmodes/ebrowse.el @@ -1,9 +1,9 @@ ;;; ebrowse.el --- Emacs C++ class browser & tags facility -;; Copyright (C) 1992-2013 Free Software Foundation, Inc. +;; Copyright (C) 1992-2015 Free Software Foundation, Inc. ;; Author: Gerd Moellmann <gerd@gnu.org> -;; Maintainer: FSF +;; Maintainer: emacs-devel@gnu.org ;; Keywords: C++ tags tools ;; This file is part of GNU Emacs. @@ -2015,7 +2015,7 @@ COLLAPSE non-nil means collapse the branch." (defun ebrowse-electric-list-looper (state condition) "Prevent cursor from moving beyond the buffer end. Don't let it move into the title lines. -See 'Electric-command-loop' for a description of STATE and CONDITION." +See `Electric-command-loop' for a description of STATE and CONDITION." (cond ((and condition (not (memq (car condition) '(buffer-read-only end-of-buffer @@ -3471,7 +3471,7 @@ are not performed." (with-output-to-temp-buffer (concat "*Apropos Members*") (set-buffer standard-output) (erase-buffer) - (insert "Members matching `" regexp "'\n\n") + (insert (format-message "Members matching `%s'\n\n" regexp)) (cl-loop for s in (ebrowse-list-of-matching-members members regexp) do (cl-loop for info in (gethash s members) do (ebrowse-draw-file-member-info info)))))) @@ -4223,7 +4223,8 @@ NUMBER-OF-STATIC-VARIABLES:" (1+ (point))))))))) (unless non-empty (error "No tree buffers")) - (setf unread-command-events (listify-key-sequence "p")) + (setf unread-command-events + (nconc (listify-key-sequence "p") unread-command-events)) (shrink-window-if-larger-than-buffer (selected-window)) (setq buffer-read-only t)))) |