diff options
| author | Miles Bader <miles@gnu.org> | 2005-07-07 12:43:14 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2005-07-07 12:43:14 +0000 |
| commit | d3e4babdd1267fb5690a17949196640a47c6f159 (patch) | |
| tree | 968a42dfa187e492f9ce188aaf669d0cebf4bfe2 /lisp/emacs-lisp/edebug.el | |
| parent | eeb88b27e1dbd3f412aa684d44e4a784f6e536a2 (diff) | |
| parent | a5717394ea6fbd7ea179c362646f4495f88245cb (diff) | |
| download | emacs-d3e4babdd1267fb5690a17949196640a47c6f159.tar.gz emacs-d3e4babdd1267fb5690a17949196640a47c6f159.tar.bz2 emacs-d3e4babdd1267fb5690a17949196640a47c6f159.zip | |
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-68
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 459-473)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 86-87)
- Update from CVS
Diffstat (limited to 'lisp/emacs-lisp/edebug.el')
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index ebe375088a3..fe0453519df 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -21,8 +21,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Commentary: @@ -61,7 +61,7 @@ ;;; Options (defgroup edebug nil - "A source-level debugger for Emacs Lisp" + "A source-level debugger for Emacs Lisp." :group 'lisp) @@ -519,7 +519,7 @@ the minibuffer." (put ',(nth 1 form) 'saved-face ',(get (nth 1 form) 'saved-face)) (put ',(nth 1 form) 'customized-face - ',(nth 2 form))) + ,(nth 2 form))) (put (nth 1 form) 'saved-face nil))))) (setq edebug-result (eval form)) (if (not edebugging) @@ -4224,7 +4224,7 @@ reinstrument it." (- (current-column) (if (= ?\( (following-char)) 0 1))))) (insert (make-string - (max 0 (- col (- (point) start-of-count-line))) ?\ ) + (max 0 (- col (- (point) start-of-count-line))) ?\s) (if (and (< 0 count) (not (memq coverage '(unknown ok-coverage)))) |