changeset 85923:a6bcf6e8ed42

(define-abbrev-table): Doc fix.

--- a/lisp/abbrev.el	Sun Nov 04 12:01:35 2007 +0000
+++ b/lisp/abbrev.el	Sun Nov 04 22:58:50 2007 +0000
@@ -434,7 +434,7 @@
                       ,(if (symbolp var)
                            `(if (local-variable-p ',var)
                                 (default-value ',var)))))))
-         
+
 
 ;;; Code that used to be implemented in src/abbrev.c
 
@@ -637,7 +637,7 @@
                 (if (listp (cdr x))
                     (append (cdr x) tables) (cons (cdr x) tables)))))
       tables))))
-          
+
 
 (defun abbrev-symbol (abbrev &optional table)
   "Return the symbol representing abbrev named ABBREV.
@@ -665,7 +665,7 @@
                            sym)))))))
     (if (symbol-value sym)
         sym)))
-	       
+
 
 (defun abbrev-expansion (abbrev &optional table)
   "Return the string that ABBREV expands into in the current buffer.
@@ -697,7 +697,7 @@
             (setq name (buffer-substring start end))
             (goto-char pos)               ; Restore point.
             (list (abbrev-symbol name tables) name start end)))
-        
+
       (while (and tables (not (car res)))
         (let* ((table (pop tables))
                (enable-fun (abbrev-table-get table :enable-function)))
@@ -889,7 +889,7 @@
   abbreviations.
 - `:case-fixed' non-nil means that abbreviations are looked up without
   case-folding, and the expansion is not capitalized/upcased.
-- `:regexp' describes the form of abbrevs.  It defaults to \\<\\(\\w+\\)\\W* which
+- `:regexp' describes the form of abbrevs.  It defaults to \\=\\<\\(\\w+\\)\\W* which
   means that an abbrev can only be a single word.  The submatch 1 is treated
   as the potential name of an abbrev.
 - `:enable-function' can be set to a function of no argument which returns