diff options
| author | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2011-07-15 15:55:00 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2011-07-15 15:55:00 +0200 |
| commit | 1b5eaeb36cb630692e7a9c523f49ad7e9c9e2263 (patch) | |
| tree | 1e8e92fc9a067b17f85ec2839c0dbc067e531ca5 | |
| parent | 4bf0979f4c5b87f53a1da435569ba5646e1d93e5 (diff) | |
| download | emacs-1b5eaeb36cb630692e7a9c523f49ad7e9c9e2263.tar.gz | |
Minor grammer fixes for syntax.el.
Fixes: debbugs:8690
| -rw-r--r-- | lisp/emacs-lisp/cl-loaddefs.el | 7 | ||||
| -rw-r--r-- | lisp/emacs-lisp/syntax.el | 4 |
2 files changed, 8 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/cl-loaddefs.el b/lisp/emacs-lisp/cl-loaddefs.el index 48c7386bd43..1c766afc8db 100644 --- a/lisp/emacs-lisp/cl-loaddefs.el +++ b/lisp/emacs-lisp/cl-loaddefs.el @@ -282,7 +282,7 @@ Not documented ;;;;;; flet progv psetq do-all-symbols do-symbols dotimes dolist ;;;;;; do* do loop return-from return block etypecase typecase ecase ;;;;;; case load-time-value eval-when destructuring-bind function* -;;;;;; defmacro* defun* gentemp gensym) "cl-macs" "cl-macs.el" "9f551dc739a39b3c8b420fbd1ab71879") +;;;;;; defmacro* defun* gentemp gensym) "cl-macs" "cl-macs.el" "dd99db1e96dff411cc5d484a639a1330") ;;; Generated autoloads from cl-macs.el (autoload 'gensym "cl-macs" "\ @@ -541,7 +541,12 @@ values. For compatibility, (values A B C) is a synonym for (list A B C). \(fn TYPE FORM)" nil (quote macro)) (autoload 'declare "cl-macs" "\ +Declare something about SPECS while compiling. +For instance + (declare (warn 0)) + +will turn off byte-compile warnings. \(fn &rest SPECS)" nil (quote macro)) diff --git a/lisp/emacs-lisp/syntax.el b/lisp/emacs-lisp/syntax.el index 200b3a6389b..c65cbc39eab 100644 --- a/lisp/emacs-lisp/syntax.el +++ b/lisp/emacs-lisp/syntax.el @@ -100,7 +100,7 @@ Put first the functions more likely to cause a change and cheaper to compute.") (cons beg end)) (defvar syntax-propertize--done -1 - "Position upto which syntax-table properties have been set.") + "Position up to which syntax-table properties have been set.") (make-variable-buffer-local 'syntax-propertize--done) (defun syntax-propertize--shift-groups (re n) @@ -283,7 +283,7 @@ The return value is a function suitable for `syntax-propertize-function'." (setq keywords font-lock-syntactic-keywords)))))) (defun syntax-propertize (pos) - "Ensure that syntax-table properties are set upto POS." + "Ensure that syntax-table properties are set until POS." (when (and syntax-propertize-function (< syntax-propertize--done pos)) ;; (message "Needs to syntax-propertize from %s to %s" |