(edebug-all-defs, edebug-all-forms): Add autoload cookies.

(edebug-outside-d-c-i-n-s-w): New variable.
(edebug-display, edebug-outside-excursion): Use it to save the
original value of default-cursor-in-non-selected-windows.
Set default-cursor-in-non-selected-windows to t while Edebug is active.
(edebug-mode, edebug-eval-mode): Doc fix.

2 files changed, 44 insertions, 4 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 21a25f79be3..029c0b93d7d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,35 @@
+2005-12-23  Juri Linkov  <juri@jurta.org>
+
+        * emacs-lisp/edebug.el (edebug-all-defs, edebug-all-forms):
+        Add autoload cookies.
+        (edebug-outside-d-c-i-n-s-w): New variable.
+        (edebug-display, edebug-outside-excursion): Use it to save the
+        original value of default-cursor-in-non-selected-windows.
+        Set default-cursor-in-non-selected-windows to t while Edebug
+        is active.
+        (edebug-mode, edebug-eval-mode): Doc fix.
+
+        * mouse.el (mouse-choose-completion): Replace `buffer-substring'
+        with `buffer-substring-no-properties' to remove common substring
+        highlighting.
+
+        * info.el (info-other-window, info): Rename function argument
+        `file' to `file-or-node'.
+        (Info-complete-menu-item): Use local variable `complete-nodes' to
+        keep the global value of `Info-complete-nodes' unchanged for
+        subsequent completions.
+        (info-tool-bar-map): Put `Info-index' icon just before `Info-search'.
+
+        * simple.el (get-next-valid-buffer, last-buffer)
+        (next-error-buffer-p, next-error-find-buffer)
+        (minibuffer-history-sexp-flag): Doc fix.
+
+        * savehist.el (savehist-mode-hook): Add `:group'.
+
+        * log-view.el: Call autoload for vc-find-version.
+        (log-view-current-file): Adjust subgroup numbers.
+        (log-view-current-tag): Add `length'.
+
 2005-12-23  Richard M. Stallman  <rms@gnu.org>
 
         * vc.el (vc-annotate-car-last-cons): Defn moved up.
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index 9290ede2bdf..beb88cfea25 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -570,6 +570,7 @@ already is one.)"
 ;; Compatibility with old versions.
 (defalias 'edebug-all-defuns 'edebug-all-defs)
 
+;;;###autoload
 (defun edebug-all-defs ()
   "Toggle edebugging of all definitions."
   (interactive)
@@ -578,6 +579,7 @@ already is one.)"
            (if edebug-all-defs "on" "off")))
 
 
+;;;###autoload
 (defun edebug-all-forms ()
   "Toggle edebugging of all forms."
   (interactive)
@@ -2516,6 +2518,7 @@ MSG is printed after `::::} '."
 (defvar edebug-outside-o-a-p) ; outside overlay-arrow-position
 (defvar edebug-outside-o-a-s) ; outside overlay-arrow-string
 (defvar edebug-outside-c-i-e-a) ; outside cursor-in-echo-area
+(defvar edebug-outside-d-c-i-n-s-w) ; outside default-cursor-in-non-selected-windows
 
 (defvar edebug-eval-list nil) ;; List of expressions to evaluate.
 
@@ -2557,11 +2560,13 @@ MSG is printed after `::::} '."
 
         (edebug-outside-o-a-p overlay-arrow-position)
         (edebug-outside-o-a-s overlay-arrow-string)
-        (edebug-outside-c-i-e-a cursor-in-echo-area))
+        (edebug-outside-c-i-e-a cursor-in-echo-area)
+        (edebug-outside-d-c-i-n-s-w default-cursor-in-non-selected-windows))
     (unwind-protect
         (let ((overlay-arrow-position overlay-arrow-position)
               (overlay-arrow-string overlay-arrow-string)
               (cursor-in-echo-area nil)
+              (default-cursor-in-non-selected-windows t)
               ;; any others??
               )
           (if (not (buffer-name edebug-buffer))
@@ -2767,7 +2772,8 @@ MSG is printed after `::::} '."
       (setq
        overlay-arrow-position edebug-outside-o-a-p
        overlay-arrow-string edebug-outside-o-a-s
-       cursor-in-echo-area edebug-outside-c-i-e-a)
+       cursor-in-echo-area edebug-outside-c-i-e-a
+       default-cursor-in-non-selected-windows edebug-outside-d-c-i-n-s-w)
       )))
 
 
@@ -3580,6 +3586,7 @@ Return the result of the last expression."
            (overlay-arrow-position edebug-outside-o-a-p)
            (overlay-arrow-string edebug-outside-o-a-s)
            (cursor-in-echo-area edebug-outside-c-i-e-a)
+           (default-cursor-in-non-selected-windows edebug-outside-d-c-i-n-s-w)
            )
        (unwind-protect
            (save-excursion              ; of edebug-buffer
@@ -3618,6 +3625,7 @@ Return the result of the last expression."
           edebug-outside-o-a-p overlay-arrow-position
           edebug-outside-o-a-s overlay-arrow-string
           edebug-outside-c-i-e-a cursor-in-echo-area
+          edebug-outside-d-c-i-n-s-w default-cursor-in-non-selected-windows
           )
 
          ;; Restore the outside saved values; don't alter
@@ -3897,7 +3905,7 @@ buffer) there are local and global key bindings to several Edebug
 specific commands.  E.g. `edebug-step-mode' is bound to \\[edebug-step-mode]
 in the Edebug buffer and \\<global-map>\\[edebug-step-mode] in any buffer.
 
-Also see bindings for the eval list buffer, *edebug*.
+Also see bindings for the eval list buffer *edebug* in `edebug-eval-mode'.
 
 The edebug buffer commands:
 \\{edebug-mode-map}
@@ -4054,7 +4062,7 @@ buffer and \\<global-map>\\[edebug-step-mode] in any buffer.
 Eval list buffer commands:
 \\{edebug-eval-mode-map}
 
-Global commands prefixed by global-edebug-prefix:
+Global commands prefixed by `global-edebug-prefix':
 \\{global-edebug-map}")
 
 ;;; Interface with standard debugger.