[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/checkdoc.el
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/checkdoc.el |
Date: |
Tue, 04 Feb 2003 07:53:38 -0500 |
Index: emacs/lisp/emacs-lisp/checkdoc.el
diff -c emacs/lisp/emacs-lisp/checkdoc.el:1.33
emacs/lisp/emacs-lisp/checkdoc.el:1.34
*** emacs/lisp/emacs-lisp/checkdoc.el:1.33 Mon Dec 23 12:59:31 2002
--- emacs/lisp/emacs-lisp/checkdoc.el Tue Feb 4 07:53:34 2003
***************
*** 426,432 ****
;; end of a word in a conglomerate.
(modify-syntax-entry ?- "w" checkdoc-syntax-table)
)
!
;;; Compatibility
;;
--- 426,432 ----
;; end of a word in a conglomerate.
(modify-syntax-entry ?- "w" checkdoc-syntax-table)
)
!
;;; Compatibility
;;
***************
*** 940,946 ****
(checkdoc-show-diagnostics)))
(goto-char p))
(if (interactive-p) (message "Checking interactive message text...done.")))
!
;;;###autoload
(defun checkdoc-eval-defun ()
"Evaluate the current form with `eval-defun' and check its documentation.
--- 940,946 ----
(checkdoc-show-diagnostics)))
(goto-char p))
(if (interactive-p) (message "Checking interactive message text...done.")))
!
;;;###autoload
(defun checkdoc-eval-defun ()
"Evaluate the current form with `eval-defun' and check its documentation.
***************
*** 2340,2346 ****
(while (setq type (checkdoc-message-text-next-string end))
(setq e (checkdoc-message-text-engine type)))
e))
!
(defun checkdoc-message-text-next-string (end)
"Move cursor to the next checkable message string after point.
Return the message classification.
--- 2340,2346 ----
(while (setq type (checkdoc-message-text-next-string end))
(setq e (checkdoc-message-text-engine type)))
e))
!
(defun checkdoc-message-text-next-string (end)
"Move cursor to the next checkable message string after point.
Return the message classification.
- [Emacs-diffs] Changes to emacs/lisp/emacs-lisp/checkdoc.el,
Juanma Barranquero <=