[Emacs-diffs] emacs/lisp ChangeLog cedet/mode-local.el

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/11/03 03:22:34

Modified files:
        lisp           : ChangeLog 
        lisp/cedet     : mode-local.el 

Log message:
        (with-mode-local): Doc fix.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16547&r2=1.16548
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/mode-local.el?cvsroot=emacs&r1=1.4&r2=1.5

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16547
retrieving revision 1.16548
diff -u -b -r1.16547 -r1.16548
--- ChangeLog   3 Nov 2009 03:16:23 -0000       1.16547
+++ ChangeLog   3 Nov 2009 03:22:30 -0000       1.16548
@@ -1,5 +1,7 @@
 2009-11-03  Glenn Morris  <address@hidden>
 
+       * cedet/mode-local.el (with-mode-local): Doc fix.
+
        * emacs-lisp/bytecomp.el (byte-compile-file-form-defvar)
        (byte-compile-file-form-define-abbrev-table)
        (byte-compile-file-form-custom-declare-variable)

Index: cedet/mode-local.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/mode-local.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- cedet/mode-local.el 28 Oct 2009 14:01:52 -0000      1.4
+++ cedet/mode-local.el 3 Nov 2009 03:22:33 -0000       1.5
@@ -70,6 +70,9 @@
   (or (get mode 'mode-local-parent)
       (get mode 'derived-mode-parent)))
 
+;; FIXME doc (and function name) seems wrong.
+;; Return a list of MODE and all its parent modes, if any.
+;; Lists parent modes first.
 (defun mode-local-equivalent-mode-p (mode)
   "Is the major-mode in the current buffer equivalent to a mode in MODES."
   (let ((modes nil))
@@ -377,7 +380,7 @@
 The current mode bindings are saved, BODY is evaluated, and the saved
 bindings are restored, even in case of an abnormal exit.
 Value is what BODY returns.
-This lis like `with-mode-local-symbol', except that MODE is quoted
+This is like `with-mode-local-symbol', except that MODE is quoted
 and is note evaluated."
    `(with-mode-local-symbol ',mode ,@body))
 (put 'with-mode-local 'lisp-indent-function 1)