[Emacs-diffs] /srv/bzr/emacs/trunk r100343: * emacs-lisp/smie.el: Fix typos in docstrings.

[Juanma Barranquero]

------------------------------------------------------------
revno: 100343
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Tue 2010-05-18 09:44:07 +0200
message:
  * emacs-lisp/smie.el: Fix typos in docstrings.
modified:
  lisp/ChangeLog
  lisp/emacs-lisp/smie.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-05-17 19:27:26 +0000
+++ b/lisp/ChangeLog    2010-05-18 07:44:07 +0000
@@ -1,3 +1,8 @@
+2010-05-18  Juanma Barranquero  <address@hidden>
+
+       * emacs-lisp/smie.el (smie-precs-precedence-table, smie-backward-sexp)
+       (smie-forward-sexp, smie-indent-calculate): Fix typos in docstrings.
+
 2010-05-17  Stefan Monnier  <address@hidden>
 
        Provide a simple generic indentation engine and use it for Prolog.

=== modified file 'lisp/emacs-lisp/smie.el'
--- a/lisp/emacs-lisp/smie.el   2010-05-17 19:27:26 +0000
+++ b/lisp/emacs-lisp/smie.el   2010-05-18 07:44:07 +0000
@@ -86,7 +86,7 @@
 PRECS should be a list, sorted by precedence (e.g. \"+\" will
 come before \"*\"), of elements of the form \(left OP ...)
 or (right OP ...) or (nonassoc OP ...)  or (assoc OP ...).  All operators in
-one of those elements shares the same precedence level and associativity."
+one of those elements share the same precedence level and associativity."
   (let ((prec2-table (make-hash-table :test 'equal)))
     (dolist (prec precs)
       (dolist (op (cdr prec))
@@ -300,7 +300,7 @@
   (LEFT-LEVEL POS TOKEN): we couldn't skip TOKEN because its right-level
     is too high.  LEFT-LEVEL is the left-level of TOKEN,
     POS is its start position in the buffer.
-  (t POS TOKEN): Same thing but for an open-paren or the beginning of buffer.
+  (t POS TOKEN): same thing but for an open-paren or the beginning of buffer.
   (nil POS TOKEN): we skipped over a paren-like pair.
   nil: we skipped over an identifier, matched parentheses, ..."
   (if (bobp) (list t (point))
@@ -311,7 +311,7 @@
                    (token (progn (forward-comment (- (point-max)))
                                  (smie-backward-token)))
                    (toklevels (cdr (assoc token smie-op-levels))))
-      
+
               (cond
                ((null toklevels)
                 (if (equal token "")
@@ -360,7 +360,7 @@
   (RIGHT-LEVEL POS TOKEN): we couldn't skip TOKEN because its left-level
     is too high.  RIGHT-LEVEL is the right-level of TOKEN,
     POS is its end position in the buffer.
-  (t POS TOKEN): Same thing but for an open-paren or the beginning of buffer.
+  (t POS TOKEN): same thing but for an open-paren or the beginning of buffer.
   (nil POS TOKEN): we skipped over a paren-like pair.
   nil: we skipped over an identifier, matched parentheses, ..."
   (if (eobp) (list t (point))
@@ -371,7 +371,7 @@
                    (token (progn (forward-comment (point-max))
                                  (smie-forward-token)))
                    (toklevels (cdr (assoc token smie-op-levels))))
-      
+
               (cond
                ((null toklevels)
                 (if (equal token "")
@@ -485,7 +485,7 @@
 in order to figure out the indentation of some other (further down) point.
 VIRTUAL can take two different non-nil values:
 - :bolp: means that the current indentation of point can be trusted
-  to be good only if if it follows a line break.
+  to be good only if it follows a line break.
 - :hanging: means that the current indentation of point can be
   trusted to be good except if the following token is hanging."
   ;; FIXME: This has accumulated a lot of rules, some of which aren't