[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/debug.el
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/debug.el |
Date: |
Sun, 23 Oct 2005 23:52:36 -0400 |
Index: emacs/lisp/emacs-lisp/debug.el
diff -c emacs/lisp/emacs-lisp/debug.el:1.96 emacs/lisp/emacs-lisp/debug.el:1.97
*** emacs/lisp/emacs-lisp/debug.el:1.96 Sat Sep 24 13:43:59 2005
--- emacs/lisp/emacs-lisp/debug.el Mon Oct 24 03:52:35 2005
***************
*** 353,361 ****
(forward-line -1)
(setq new-start (point)))
(if (not (zerop
! (compare-buffer-substrings
! (current-buffer) old-start old-end
! buffer new-start new-end)))
(setq all-match nil))))
;; Now new-end is the position of the start of the
;; unchanged part in the current buffer, and old-end is
--- 353,362 ----
(forward-line -1)
(setq new-start (point)))
(if (not (zerop
! (let ((case-fold-search nil))
! (compare-buffer-substrings
! (current-buffer) old-start old-end
! buffer new-start new-end))))
(setq all-match nil))))
;; Now new-end is the position of the start of the
;; unchanged part in the current buffer, and old-end is
***************
*** 659,664 ****
--- 660,668 ----
For the cross-reference format, see `help-make-xrefs'."
(interactive "d")
(require 'help-mode)
+ ;; Ideally we'd just do (call-interactively 'help-follow) except that this
+ ;; assumes we're already in a *Help* buffer and reuses it, so it ends up
+ ;; incorrectly "reusing" the *Backtrace* buffer to show the help info.
(unless pos
(setq pos (point)))
(unless (push-button pos)
***************
*** 671,678 ****
(progn (skip-syntax-forward "w_")
(point)))))))
(when (or (boundp sym) (fboundp sym) (facep sym))
! (switch-to-buffer-other-window (generate-new-buffer "*Help*"))
! (help-do-xref pos #'help-xref-interned (list sym))))))
;; When you change this, you may also need to change the number of
;; frames that the debugger skips.
--- 675,681 ----
(progn (skip-syntax-forward "w_")
(point)))))))
(when (or (boundp sym) (fboundp sym) (facep sym))
! (help-xref-interned sym)))))
;; When you change this, you may also need to change the number of
;; frames that the debugger skips.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/emacs-lisp/debug.el,
Stefan Monnier <=