[Emacs-diffs] emacs/lisp ChangeLog emacs-lisp/chart.el emacs-...

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/10/01 02:50:05

Modified files:
        lisp           : ChangeLog 
        lisp/emacs-lisp: chart.el eieio-comp.el eieio-datadebug.el 
                         eieio-opt.el eieio-speedbar.el eieio.el 

Log message:
        Doc/message fixes.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16307&r2=1.16308
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/chart.el?cvsroot=emacs&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/eieio-comp.el?cvsroot=emacs&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/eieio-datadebug.el?cvsroot=emacs&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/eieio-opt.el?cvsroot=emacs&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/eieio-speedbar.el?cvsroot=emacs&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/eieio.el?cvsroot=emacs&r1=1.4&r2=1.5

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16307
retrieving revision 1.16308
diff -u -b -r1.16307 -r1.16308
--- ChangeLog   1 Oct 2009 02:39:07 -0000       1.16307
+++ ChangeLog   1 Oct 2009 02:50:00 -0000       1.16308
@@ -1,5 +1,14 @@
 2009-10-01  Glenn Morris  <address@hidden>
 
+       * emacs-lisp/chart.el (chart-zap-chars, chart-bar-quickie)
+       (chart-file-count):
+       * emacs-lisp/eieio-comp.el (byte-compile-defmethod-param-convert):
+       * emacs-lisp/eieio-datadebug.el (data-debug-insert-object-button):
+       * emacs-lisp/eieio-opt.el (eieio-describe-class):
+       * emacs-lisp/eieio-speedbar.el (eieio-speedbar-create):
+       * emacs-lisp/eieio.el (defclass, eieio-defclass-autoload)
+       (eieio-copy-parents-into-subclass, make-instance, class-children)
+       (eieio-generic-form):
        * cedet/cedet-files.el (cedet-directory-name-to-file-name):
        * cedet/cedet-idutils.el (cedet-idutils-search)
        (cedet-idutils-expand-filename, cedet-idutils-support-for-directory)

Index: emacs-lisp/chart.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/chart.el,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- emacs-lisp/chart.el 28 Sep 2009 00:49:58 -0000      1.2
+++ emacs-lisp/chart.el 1 Oct 2009 02:50:04 -0000       1.3
@@ -1,7 +1,7 @@
 ;;; chart.el --- Draw charts (bar charts, etc)
 
-;;; Copyright (C) 1996, 1998, 1999, 2001, 2004, 2005, 2007, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 1996, 1998, 1999, 2001, 2004, 2005, 2007, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam  <address@hidden>
 ;; Version: 0.2
@@ -528,7 +528,7 @@
          (remove-text-properties p (point) '(face))))))
 
 (defun chart-zap-chars (n)
-  "Zap up to N chars without deleteting EOLs."
+  "Zap up to N chars without deleting EOLs."
   (if (not (eobp))
       (if (< n (- (save-excursion (end-of-line) (point)) (point)))
          (delete-char n)
@@ -579,7 +579,7 @@
 (defun chart-bar-quickie (dir title namelst nametitle numlst numtitle
                              &optional max sort-pred)
   "Wash over the complex eieio stuff and create a nice bar chart.
-Creat it going in direction DIR ['horizontal 'vertical] with TITLE
+Create it going in direction DIR ['horizontal 'vertical] with TITLE
 using a name sequence NAMELST labeled NAMETITLE with values NUMLST
 labeled NUMTITLE.
 Optional arguments:
@@ -619,7 +619,7 @@
 ;;; Sample utility function
 
 (defun chart-file-count (dir)
-  "Draw a chart displaying the number of different file extentions in DIR."
+  "Draw a chart displaying the number of different file extensions in DIR."
   (interactive "DDirectory: ")
   (if (not (string-match "/$" dir))
       (setq dir (concat dir "/")))

Index: emacs-lisp/eieio-comp.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/eieio-comp.el,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- emacs-lisp/eieio-comp.el    28 Sep 2009 00:49:59 -0000      1.2
+++ emacs-lisp/eieio-comp.el    1 Oct 2009 02:50:04 -0000       1.3
@@ -1,7 +1,7 @@
 ;;; eieio-comp.el -- eieio routines to help with byte compilation
 
-;;; Copyright (C) 1995,1996, 1998, 1999, 2000, 2001, 2002, 2005, 2008,
-;;; 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1995,1996, 1998, 1999, 2000, 2001, 2002, 2005, 2008,
+;;   2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam  <address@hidden>
 ;; Version: 0.2
@@ -126,7 +126,7 @@
 
 (defun byte-compile-defmethod-param-convert (paramlist)
   "Convert method params into the params used by the defmethod thingy.
-Argument PARAMLIST is the paramter list to convert."
+Argument PARAMLIST is the parameter list to convert."
   (let ((argfix nil))
     (while paramlist
       (setq argfix (cons (if (listp (car paramlist))

Index: emacs-lisp/eieio-datadebug.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/eieio-datadebug.el,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- emacs-lisp/eieio-datadebug.el       28 Sep 2009 01:41:26 -0000      1.2
+++ emacs-lisp/eieio-datadebug.el       1 Oct 2009 02:50:04 -0000       1.3
@@ -51,7 +51,7 @@
 
 (defun data-debug-insert-object-button (object prefix prebuttontext)
   "Insert a button representing OBJECT.
-PREFIX is the text that preceeds the button.
+PREFIX is the text that precedes the button.
 PREBUTTONTEXT is some text between PREFIX and the object button."
   (let ((start (point))
        (end nil)

Index: emacs-lisp/eieio-opt.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/eieio-opt.el,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- emacs-lisp/eieio-opt.el     28 Sep 2009 00:49:59 -0000      1.2
+++ emacs-lisp/eieio-opt.el     1 Oct 2009 02:50:04 -0000       1.3
@@ -1,7 +1,7 @@
 ;;; eieio-opt.el -- eieio optional functions (debug, printing, speedbar)
 
-;;; Copyright (C) 1996, 1998, 1999, 2000, 2001, 2002, 2003, 2005,
-;;; 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1996, 1998, 1999, 2000, 2001, 2002, 2003, 2005, 2008,
+;;   2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam  <address@hidden>
 ;; Version: 0.2
@@ -75,7 +75,7 @@
 
 (defun eieio-describe-class (class &optional headerfcn)
   "Describe a CLASS defined by a string or symbol.
-If CLASS is actually an object, then also display current values of that obect.
+If CLASS is actually an object, then also display current values of that 
object.
 Optional HEADERFCN should be called to insert a few bits of info first."
   (interactive (list (eieio-read-class "Class: ")))
   (with-output-to-temp-buffer (help-buffer) ;"*Help*"

Index: emacs-lisp/eieio-speedbar.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/eieio-speedbar.el,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- emacs-lisp/eieio-speedbar.el        29 Sep 2009 07:09:18 -0000      1.3
+++ emacs-lisp/eieio-speedbar.el        1 Oct 2009 02:50:04 -0000       1.4
@@ -77,9 +77,9 @@
 ;;    string.   This will automatically handle cases when speedbar is
 ;;    not already loaded, and specifying all overload functions.
 ;;
-;; 5) Create an initliazer function which looks like this:
+;; 5) Create an initializer function which looks like this:
 ;;
-;; (defun my-speedbar-mode-initilaize ()
+;; (defun my-speedbar-mode-initialize ()
 ;;   "documentation"
 ;;   (interactive)
 ;;   (speedbar-frame-mode 1)
@@ -136,8 +136,8 @@
   "Create a speedbar mode for displaying an object hierarchy.
 MAP-FN is the keymap generator function used for extra keys.
 MAP-VAR is the keymap variable used.
-MENU-VAR is the symbol containting an easymenu compatible menu part to use.
-MODENAME is a s tring used to identify this browser mode.
+MENU-VAR is the symbol containing an easymenu compatible menu part to use.
+MODENAME is a string used to identify this browser mode.
 FETCHER is a generic function used to fetch the base object list used when
 creating the speedbar display."
   (if (not (featurep 'speedbar))

Index: emacs-lisp/eieio.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/eieio.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- emacs-lisp/eieio.el 30 Sep 2009 15:29:53 -0000      1.4
+++ emacs-lisp/eieio.el 1 Oct 2009 02:50:04 -0000       1.5
@@ -1,8 +1,8 @@
 ;;; eieio.el --- Enhanced Implementation of Emacs Interpreted Objects
 ;;;              or maybe Eric's Implementation of Emacs Intrepreted Objects
 
-;;; Copyright (C) 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2003,
-;;; 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
+;;   2005, 2006, 2007, 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam  <address@hidden>
 ;; Version: 0.2
@@ -307,7 +307,7 @@
                         If a string, use as an error string if someone does
                         try to make an instance.
   :method-invocation-order
-                      - Control the method invokation order if there is
+                      - Control the method invocation order if there is
                         multiple inheritance.  Valid values are:
                          :breadth-first - The default.
                          :depth-first
@@ -333,7 +333,7 @@
 ;;;###autoload
 (defun eieio-defclass-autoload (cname superclasses filename doc)
   "Create autoload symbols for the EIEIO class CNAME.
-SUPERCLASSES are the superclasses that CNAME inherites from.
+SUPERCLASSES are the superclasses that CNAME inherits from.
 DOC is the docstring for CNAME.
 This function creates a mock-class for CNAME and adds it into
 SUPERCLASSES as children.
@@ -1020,7 +1020,7 @@
 
 (defun eieio-copy-parents-into-subclass (newc parents)
   "Copy into NEWC the slots of PARENTS.
-Follow the rules of not overwritting early parents when applying to
+Follow the rules of not overwriting early parents when applying to
 the new child class."
   (let ((ps (aref newc class-parent))
        (sn (class-option-assoc (aref newc class-options)
@@ -1101,7 +1101,7 @@
 
   (make-instance 'foo :slot1 value1 :slotN valueN)
 
-Compatability note:
+Compatibility note:
 
 If the first element of INITARGS is a string, it is used as the
 name of the class.
@@ -1615,7 +1615,7 @@
   `(aref (class-v ,class) class-children))
 
 (defun class-children (class)
-"Return child classses to CLASS.
+"Return child classes to CLASS.
 
 The CLOS function `class-direct-subclasses' is aliased to this function."
   (if (not (class-p class)) (signal 'wrong-type-argument (list 'class-p 
class)))
@@ -2274,7 +2274,7 @@
 If CLASS is not a class then use `generic' instead.  If class has no
 form, but has a parent class, then trace to that parent class.  The
 first time a form is requested from a symbol, an optimized path is
-memoized for future faster use."
+memorized for future faster use."
  (let ((emto (aref (get method 'eieio-method-obarray)
                   (if class key (+ key 3)))))
    (if (class-p class)