# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1031941357 0
# Node ID c5035e184eba2e99c668249fb592a60255077251
# Parent  4e6b6d281dd1cc787fc65ee3ea1157371f875f1e
(comment-with-narrowing): Use the `declare' thingy.

diff -r 4e6b6d281dd1 -r c5035e184eba lisp/newcomment.el
--- a/lisp/newcomment.el	Fri Sep 13 16:22:04 2002 +0000
+++ b/lisp/newcomment.el	Fri Sep 13 18:22:37 2002 +0000
@@ -734,12 +734,11 @@
     (cons (concat cs "\n" (make-string min-indent ? ) ccs)
 	  (concat cce "\n" (make-string (+ min-indent eindent) ? ) ce))))
 
-(def-edebug-spec comment-with-narrowing t)
-(put 'comment-with-narrowing 'lisp-indent-function 2)
 (defmacro comment-with-narrowing (beg end &rest body)
   "Execute BODY with BEG..END narrowing.
 Space is added (and then removed) at the beginning for the text's
 indentation to be kept as it was before narrowing."
+  (declare (debug t) (indent 2))
   (let ((bindent (make-symbol "bindent")))
     `(let ((,bindent (save-excursion (goto-char beg) (current-column))))
        (save-restriction