diff options
| author | Glenn Morris | 2014-05-01 19:55:25 -0400 |
|---|---|---|
| committer | Glenn Morris | 2014-05-01 19:55:25 -0400 |
| commit | d136f1846276c44fa65ec56fb62680a4026750cd (patch) | |
| tree | 1e69817c0fee794d5fc8d80708474ff5e4b73556 | |
| parent | 969aabf250a052aebe981eaa5f222b55ffc8deb1 (diff) | |
| download | emacs-d136f1846276c44fa65ec56fb62680a4026750cd.tar.gz emacs-d136f1846276c44fa65ec56fb62680a4026750cd.zip | |
Doc fixes
* doc/misc/autotype.texi (Skeleton Language):
* doc/misc/message.texi (Header Commands):
* lisp/allout-widgets.el (allout-widgets-tally)
(allout-decorate-item-guides):
* lisp/menu-bar.el (menu-bar-positive-p):
* lisp/minibuffer.el (completion-pcm-complete-word-inserts-delimiters):
* lisp/cedet/ede.el (ede-project-directories, ede-check-project-directory):
* lisp/cedet/semantic/ia-sb.el (semantic-ia-sb-show-doc):
* lisp/cedet/semantic/tag.el (semantic-tag-in-buffer-p):
* lisp/cedet/semantic/bovine/c.el (semantic-tag-abstract-p):
* lisp/gnus/gnus-registry.el (gnus-registry-install-p): Doc fix.
* lisp/progmodes/gdb-mi.el (gdbmi-same-start, gdbmi-is-number):
* lisp/progmodes/js.el (js--inside-param-list-p)
(js--inside-dojo-class-list-p, js--forward-destructuring-spec):
* lisp/progmodes/prolog.el (region-exists-p):
* lisp/progmodes/verilog-mode.el (verilog-scan-cache-ok-p):
* lisp/textmodes/reftex-parse.el (reftex-using-biblatex-p):
* lisp/url/url-parse.el (url-generic-parse-url):
* src/floatfns.c (Fisnan):
* src/profiler.c (Fprofiler_cpu_running_p):
Doc fixes (replace `iff').
Fixes: debbugs:17309
| -rw-r--r-- | doc/misc/ChangeLog | 5 | ||||
| -rw-r--r-- | doc/misc/autotype.texi | 4 | ||||
| -rw-r--r-- | doc/misc/message.texi | 5 | ||||
| -rw-r--r-- | doc/misc/semantic.texi | 2 | ||||
| -rw-r--r-- | lisp/ChangeLog | 14 | ||||
| -rw-r--r-- | lisp/allout-widgets.el | 4 | ||||
| -rw-r--r-- | lisp/cedet/ChangeLog | 8 | ||||
| -rw-r--r-- | lisp/cedet/ede.el | 4 | ||||
| -rw-r--r-- | lisp/cedet/semantic/bovine/c.el | 2 | ||||
| -rw-r--r-- | lisp/cedet/semantic/ia-sb.el | 5 | ||||
| -rw-r--r-- | lisp/cedet/semantic/tag.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/gnus/gnus-registry.el | 6 | ||||
| -rw-r--r-- | lisp/menu-bar.el | 2 | ||||
| -rw-r--r-- | lisp/minibuffer.el | 2 | ||||
| -rw-r--r-- | lisp/progmodes/gdb-mi.el | 4 | ||||
| -rw-r--r-- | lisp/progmodes/js.el | 6 | ||||
| -rw-r--r-- | lisp/progmodes/prolog.el | 2 | ||||
| -rw-r--r-- | lisp/progmodes/sh-script.el | 2 | ||||
| -rw-r--r-- | lisp/progmodes/verilog-mode.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/reftex-parse.el | 2 | ||||
| -rw-r--r-- | lisp/url/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/url/url-parse.el | 2 | ||||
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/floatfns.c | 5 | ||||
| -rw-r--r-- | src/profiler.c | 2 |
26 files changed, 71 insertions, 34 deletions
diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog index d80a44b2db8..86ae8c99782 100644 --- a/doc/misc/ChangeLog +++ b/doc/misc/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2014-05-01 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * autotype.texi (Skeleton Language): | ||
| 4 | * message.texi (Header Commands): Replace `iff'. | ||
| 5 | |||
| 1 | 2014-04-22 Bastien Guerry <bzg@gnu.org> | 6 | 2014-04-22 Bastien Guerry <bzg@gnu.org> |
| 2 | 7 | ||
| 3 | * org.texi (Installation): Be more clear on why installing Org | 8 | * org.texi (Installation): Be more clear on why installing Org |
diff --git a/doc/misc/autotype.texi b/doc/misc/autotype.texi index ae3fa0e5870..e01a6c2f5c5 100644 --- a/doc/misc/autotype.texi +++ b/doc/misc/autotype.texi | |||
| @@ -241,10 +241,10 @@ put at these places. Point is left at first @code{_} where nothing is wrapped. | |||
| 241 | Indent line according to major mode. When following element is @code{_}, and | 241 | Indent line according to major mode. When following element is @code{_}, and |
| 242 | there is a interregion that will be wrapped here, indent that interregion. | 242 | there is a interregion that will be wrapped here, indent that interregion. |
| 243 | @item @code{&} | 243 | @item @code{&} |
| 244 | Logical and. Iff preceding element moved point, i.e., usually inserted | 244 | Logical and. If preceding element moved point, i.e., usually inserted |
| 245 | something, do following element. | 245 | something, do following element. |
| 246 | @item @code{|} | 246 | @item @code{|} |
| 247 | Logical xor. Iff preceding element didn't move point, i.e., usually inserted | 247 | Logical xor. If preceding element didn't move point, i.e., usually inserted |
| 248 | nothing, do following element. | 248 | nothing, do following element. |
| 249 | @item @code{-@var{number}} | 249 | @item @code{-@var{number}} |
| 250 | Delete preceding number characters. Depends on value of | 250 | Delete preceding number characters. Depends on value of |
diff --git a/doc/misc/message.texi b/doc/misc/message.texi index 9be8ca05620..75452aa57cf 100644 --- a/doc/misc/message.texi +++ b/doc/misc/message.texi | |||
| @@ -742,9 +742,8 @@ by the @code{message-cross-post-note-function} variable. | |||
| 742 | @item C-c C-f t | 742 | @item C-c C-f t |
| 743 | @kindex C-c C-f t | 743 | @kindex C-c C-f t |
| 744 | @findex message-reduce-to-to-cc | 744 | @findex message-reduce-to-to-cc |
| 745 | Replace contents of @samp{To} header with contents of @samp{Cc} or | 745 | Replace contents of @samp{To} header with contents of @samp{Cc} |
| 746 | @samp{Bcc} header. (Iff @samp{Cc} header is not present, @samp{Bcc} | 746 | header (or the @samp{Bcc} header, if there is no @samp{Cc} header). |
| 747 | header will be used instead.) | ||
| 748 | 747 | ||
| 749 | @item C-c C-f w | 748 | @item C-c C-f w |
| 750 | @kindex C-c C-f w | 749 | @kindex C-c C-f w |
diff --git a/doc/misc/semantic.texi b/doc/misc/semantic.texi index f9ccd034fe6..b72fb3c88cf 100644 --- a/doc/misc/semantic.texi +++ b/doc/misc/semantic.texi | |||
| @@ -611,7 +611,7 @@ Emacs Lisp. It is an LALR parser suitable for complex languages. | |||
| 611 | @c LocalWords: deffn deffnx defun defvar destructor's dfn diff dir | 611 | @c LocalWords: deffn deffnx defun defvar destructor's dfn diff dir |
| 612 | @c LocalWords: doc docstring EDE EIEIO elisp emacsman emph enum | 612 | @c LocalWords: doc docstring EDE EIEIO elisp emacsman emph enum |
| 613 | @c LocalWords: eq Exp EXPANDFULL expression fn foo func funcall | 613 | @c LocalWords: eq Exp EXPANDFULL expression fn foo func funcall |
| 614 | @c LocalWords: ia ids iff ifinfo imenu imenus init int isearch itemx java kbd | 614 | @c LocalWords: ia ids ifinfo imenu imenus init int isearch itemx java kbd |
| 615 | @c LocalWords: keymap keywordtable lang languagemode lexer lexing Ludlam | 615 | @c LocalWords: keymap keywordtable lang languagemode lexer lexing Ludlam |
| 616 | @c LocalWords: menubar metaparent metaparents min minibuffer Misc mode's | 616 | @c LocalWords: menubar metaparent metaparents min minibuffer Misc mode's |
| 617 | @c LocalWords: multitable NAvigaTOR noindent nomedian nonterm noselect | 617 | @c LocalWords: multitable NAvigaTOR noindent nomedian nonterm noselect |
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 669467687d2..c4115376724 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,17 @@ | |||
| 1 | 2014-05-01 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * allout-widgets.el (allout-widgets-tally) | ||
| 4 | (allout-decorate-item-guides): | ||
| 5 | * menu-bar.el (menu-bar-positive-p): | ||
| 6 | * minibuffer.el (completion-pcm-complete-word-inserts-delimiters): | ||
| 7 | * progmodes/gdb-mi.el (gdbmi-same-start, gdbmi-is-number): | ||
| 8 | * progmodes/js.el (js--inside-param-list-p) | ||
| 9 | (js--inside-dojo-class-list-p, js--forward-destructuring-spec): | ||
| 10 | * progmodes/prolog.el (region-exists-p): | ||
| 11 | * progmodes/verilog-mode.el (verilog-scan-cache-ok-p): | ||
| 12 | * textmodes/reftex-parse.el (reftex-using-biblatex-p): | ||
| 13 | Doc fixes (replace `iff'). | ||
| 14 | |||
| 1 | 2014-05-01 Stefan Monnier <monnier@iro.umontreal.ca> | 15 | 2014-05-01 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 16 | ||
| 3 | * mpc.el (mpc-volume-mouse-set): Don't burp at the boundaries. | 17 | * mpc.el (mpc-volume-mouse-set): Don't burp at the boundaries. |
diff --git a/lisp/allout-widgets.el b/lisp/allout-widgets.el index 65517607980..66ec0c333a7 100644 --- a/lisp/allout-widgets.el +++ b/lisp/allout-widgets.el | |||
| @@ -266,7 +266,7 @@ decreases as obsolete widgets are garbage collected." | |||
| 266 | (defvar allout-widgets-tally nil | 266 | (defvar allout-widgets-tally nil |
| 267 | "Hash-table of existing allout widgets, for debugging. | 267 | "Hash-table of existing allout widgets, for debugging. |
| 268 | 268 | ||
| 269 | Table is maintained iff `allout-widgets-maintain-tally' is non-nil. | 269 | Table is maintained only if `allout-widgets-maintain-tally' is non-nil. |
| 270 | 270 | ||
| 271 | The table contents will be out of sync if any widgets are created | 271 | The table contents will be out of sync if any widgets are created |
| 272 | or deleted while this variable is nil.") | 272 | or deleted while this variable is nil.") |
| @@ -1852,7 +1852,7 @@ In their absence, the current guide column flags are used. | |||
| 1852 | 1852 | ||
| 1853 | Optional PARENT-WIDGET is the widget for the item's parent item. | 1853 | Optional PARENT-WIDGET is the widget for the item's parent item. |
| 1854 | 1854 | ||
| 1855 | Optional HAS-SUCCESSOR is true iff the item is followed by a sibling. | 1855 | Optional HAS-SUCCESSOR is true if the item is followed by a sibling. |
| 1856 | 1856 | ||
| 1857 | We also hide the header-prefix string. | 1857 | We also hide the header-prefix string. |
| 1858 | 1858 | ||
diff --git a/lisp/cedet/ChangeLog b/lisp/cedet/ChangeLog index 51339cebe60..750e0bca095 100644 --- a/lisp/cedet/ChangeLog +++ b/lisp/cedet/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2014-05-01 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * ede.el (ede-project-directories, ede-check-project-directory): | ||
| 4 | * semantic/ia-sb.el (semantic-ia-sb-show-doc): | ||
| 5 | * semantic/tag.el (semantic-tag-in-buffer-p): | ||
| 6 | * semantic/bovine/c.el (semantic-tag-abstract-p): | ||
| 7 | Doc fixes (replace `iff'). | ||
| 8 | |||
| 1 | 2014-04-01 Glenn Morris <rgm@gnu.org> | 9 | 2014-04-01 Glenn Morris <rgm@gnu.org> |
| 2 | 10 | ||
| 3 | * ede/emacs.el (ede-emacs-version): Update AC_INIT regexp. (Bug#17160) | 11 | * ede/emacs.el (ede-emacs-version): Update AC_INIT regexp. (Bug#17160) |
diff --git a/lisp/cedet/ede.el b/lisp/cedet/ede.el index 70bac9aae3e..cbcc20f5039 100644 --- a/lisp/cedet/ede.el +++ b/lisp/cedet/ede.el | |||
| @@ -99,7 +99,7 @@ target willing to take the file. 'never means never perform the check." | |||
| 99 | If the value is t, EDE may search in any directory. | 99 | If the value is t, EDE may search in any directory. |
| 100 | 100 | ||
| 101 | If the value is a function, EDE calls that function with one | 101 | If the value is a function, EDE calls that function with one |
| 102 | argument, the directory name; the function should return t iff | 102 | argument, the directory name; the function should return t if |
| 103 | EDE should look for project files in the directory. | 103 | EDE should look for project files in the directory. |
| 104 | 104 | ||
| 105 | Otherwise, the value should be a list of fully-expanded directory | 105 | Otherwise, the value should be a list of fully-expanded directory |
| @@ -705,7 +705,7 @@ Otherwise, create a new project for DIR." | |||
| 705 | "Check if DIR should be in `ede-project-directories'. | 705 | "Check if DIR should be in `ede-project-directories'. |
| 706 | If it is not, try asking the user if it should be added; if so, | 706 | If it is not, try asking the user if it should be added; if so, |
| 707 | add it and save `ede-project-directories' via Customize. | 707 | add it and save `ede-project-directories' via Customize. |
| 708 | Return nil iff DIR should not be in `ede-project-directories'." | 708 | Return nil if DIR should not be in `ede-project-directories'." |
| 709 | (setq dir (directory-file-name (expand-file-name dir))) ; strip trailing / | 709 | (setq dir (directory-file-name (expand-file-name dir))) ; strip trailing / |
| 710 | (or (eq ede-project-directories t) | 710 | (or (eq ede-project-directories t) |
| 711 | (and (functionp ede-project-directories) | 711 | (and (functionp ede-project-directories) |
diff --git a/lisp/cedet/semantic/bovine/c.el b/lisp/cedet/semantic/bovine/c.el index e4f239b14a9..e9715cc1bb0 100644 --- a/lisp/cedet/semantic/bovine/c.el +++ b/lisp/cedet/semantic/bovine/c.el | |||
| @@ -1594,7 +1594,7 @@ Optional PARENT and COLOR as specified with | |||
| 1594 | "Return non-nil if TAG is considered abstract. | 1594 | "Return non-nil if TAG is considered abstract. |
| 1595 | PARENT is tag's parent. | 1595 | PARENT is tag's parent. |
| 1596 | In C, a method is abstract if it is `virtual', which is already | 1596 | In C, a method is abstract if it is `virtual', which is already |
| 1597 | handled. A class is abstract iff its destructor is virtual." | 1597 | handled. A class is abstract only if its destructor is virtual." |
| 1598 | (cond | 1598 | (cond |
| 1599 | ((eq (semantic-tag-class tag) 'type) | 1599 | ((eq (semantic-tag-class tag) 'type) |
| 1600 | (require 'semantic/find) | 1600 | (require 'semantic/find) |
diff --git a/lisp/cedet/semantic/ia-sb.el b/lisp/cedet/semantic/ia-sb.el index f77760c4452..006e8e8259f 100644 --- a/lisp/cedet/semantic/ia-sb.el +++ b/lisp/cedet/semantic/ia-sb.el | |||
| @@ -1,7 +1,6 @@ | |||
| 1 | ;;; semantic/ia-sb.el --- Speedbar analysis display interactor | 1 | ;;; semantic/ia-sb.el --- Speedbar analysis display interactor |
| 2 | 2 | ||
| 3 | ;;; Copyright (C) 2002-2004, 2006, 2008-2014 Free Software Foundation, | 3 | ;;; Copyright (C) 2002-2004, 2006, 2008-2014 Free Software Foundation, Inc. |
| 4 | ;;; Inc. | ||
| 5 | 4 | ||
| 6 | ;; Author: Eric M. Ludlam <zappo@gnu.org> | 5 | ;; Author: Eric M. Ludlam <zappo@gnu.org> |
| 7 | ;; Keywords: syntax | 6 | ;; Keywords: syntax |
| @@ -139,7 +138,7 @@ DIRECTORY is the current directory, which is ignored, and ZERO is 0." | |||
| 139 | ))) | 138 | ))) |
| 140 | 139 | ||
| 141 | (defmethod semantic-ia-sb-show-doc ((context semantic-analyze-context)) | 140 | (defmethod semantic-ia-sb-show-doc ((context semantic-analyze-context)) |
| 142 | "Show documentation about CONTEXT iff CONTEXT points at a complete symbol." | 141 | "Show documentation about CONTEXT if CONTEXT points at a complete symbol." |
| 143 | (let ((sym (car (reverse (oref context prefix)))) | 142 | (let ((sym (car (reverse (oref context prefix)))) |
| 144 | (doc nil)) | 143 | (doc nil)) |
| 145 | (when (semantic-tag-p sym) | 144 | (when (semantic-tag-p sym) |
diff --git a/lisp/cedet/semantic/tag.el b/lisp/cedet/semantic/tag.el index 97fa607f9ae..31354846ec0 100644 --- a/lisp/cedet/semantic/tag.el +++ b/lisp/cedet/semantic/tag.el | |||
| @@ -172,7 +172,7 @@ That function is for internal use only." | |||
| 172 | (semantic--tag-set-overlay tag (vector start end))))) | 172 | (semantic--tag-set-overlay tag (vector start end))))) |
| 173 | 173 | ||
| 174 | (defun semantic-tag-in-buffer-p (tag) | 174 | (defun semantic-tag-in-buffer-p (tag) |
| 175 | "Return the buffer TAG resides in IFF tag is already in a buffer. | 175 | "Return the buffer TAG resides in, if tag is already in a buffer. |
| 176 | If a tag is not in a buffer, return nil." | 176 | If a tag is not in a buffer, return nil." |
| 177 | (let ((o (semantic-tag-overlay tag))) | 177 | (let ((o (semantic-tag-overlay tag))) |
| 178 | ;; TAG is currently linked to a buffer, return it. | 178 | ;; TAG is currently linked to a buffer, return it. |
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index cdf22ef256a..00dbf131880 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2014-05-01 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * gnus-registry.el (gnus-registry-install-p): Doc fix. | ||
| 4 | |||
| 1 | 2014-03-07 Lars Ingebrigtsen <larsi@gnus.org> | 5 | 2014-03-07 Lars Ingebrigtsen <larsi@gnus.org> |
| 2 | 6 | ||
| 3 | * nnimap.el (nnimap-request-accept-article): Make respooling to nnimap | 7 | * nnimap.el (nnimap-request-accept-article): Make respooling to nnimap |
diff --git a/lisp/gnus/gnus-registry.el b/lisp/gnus/gnus-registry.el index 5989b8885bc..f3b81f77b50 100644 --- a/lisp/gnus/gnus-registry.el +++ b/lisp/gnus/gnus-registry.el | |||
| @@ -1125,9 +1125,9 @@ only the last one's marks are returned." | |||
| 1125 | (add-hook 'gnus-registry-unload-hook 'gnus-registry-unload-hook) | 1125 | (add-hook 'gnus-registry-unload-hook 'gnus-registry-unload-hook) |
| 1126 | 1126 | ||
| 1127 | (defun gnus-registry-install-p () | 1127 | (defun gnus-registry-install-p () |
| 1128 | "If the registry is not already enabled, and `gnus-registry-install' is t, | 1128 | "Return non-nil if the registry is enabled (and maybe enable it first). |
| 1129 | the registry is enabled. If `gnus-registry-install' is `ask', | 1129 | If the registry is not already enabled, then if `gnus-registry-install' |
| 1130 | the user is asked first. Returns non-nil iff the registry is enabled." | 1130 | is `ask', ask the user; or if `gnus-registry-install' is non-nil, enable it." |
| 1131 | (interactive) | 1131 | (interactive) |
| 1132 | (unless gnus-registry-enabled | 1132 | (unless gnus-registry-enabled |
| 1133 | (when (if (eq gnus-registry-install 'ask) | 1133 | (when (if (eq gnus-registry-install 'ask) |
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 84df6922749..436d8f611a8 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -922,7 +922,7 @@ by \"Save Options\" in Custom buffers.") | |||
| 922 | (selected-frame))) | 922 | (selected-frame))) |
| 923 | 923 | ||
| 924 | (defun menu-bar-positive-p (val) | 924 | (defun menu-bar-positive-p (val) |
| 925 | "Return non-nil iff VAL is a positive number." | 925 | "Return non-nil if VAL is a positive number." |
| 926 | (and (numberp val) | 926 | (and (numberp val) |
| 927 | (> val 0))) | 927 | (> val 0))) |
| 928 | 928 | ||
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index bbb7114610d..9dd4ef9fe04 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el | |||
| @@ -2772,7 +2772,7 @@ expression (not containing character ranges like `a-z')." | |||
| 2772 | 2772 | ||
| 2773 | (defcustom completion-pcm-complete-word-inserts-delimiters nil | 2773 | (defcustom completion-pcm-complete-word-inserts-delimiters nil |
| 2774 | "Treat the SPC or - inserted by `minibuffer-complete-word' as delimiters. | 2774 | "Treat the SPC or - inserted by `minibuffer-complete-word' as delimiters. |
| 2775 | Those chars are treated as delimiters iff this variable is non-nil. | 2775 | Those chars are treated as delimiters if this variable is non-nil. |
| 2776 | I.e. if non-nil, M-x SPC will just insert a \"-\" in the minibuffer, whereas | 2776 | I.e. if non-nil, M-x SPC will just insert a \"-\" in the minibuffer, whereas |
| 2777 | if nil, it will list all possible commands in *Completions* because none of | 2777 | if nil, it will list all possible commands in *Completions* because none of |
| 2778 | the commands start with a \"-\" or a SPC." | 2778 | the commands start with a \"-\" or a SPC." |
diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el index 7f8c483ee5c..0c81a8506c0 100644 --- a/lisp/progmodes/gdb-mi.el +++ b/lisp/progmodes/gdb-mi.el | |||
| @@ -1979,7 +1979,7 @@ OFFSET is the position in STR at which the comparison takes place." | |||
| 1979 | (string-equal match (substring str offset (+ offset match-length)))))) | 1979 | (string-equal match (substring str offset (+ offset match-length)))))) |
| 1980 | 1980 | ||
| 1981 | (defun gdbmi-same-start (str offset match) | 1981 | (defun gdbmi-same-start (str offset match) |
| 1982 | "Return non-nil iff STR and MATCH are equal up to the end of either strings. | 1982 | "Return non-nil if STR and MATCH are equal up to the end of either strings. |
| 1983 | OFFSET is the position in STR at which the comparison takes place." | 1983 | OFFSET is the position in STR at which the comparison takes place." |
| 1984 | (let* ((str-length (- (length str) offset)) | 1984 | (let* ((str-length (- (length str) offset)) |
| 1985 | (match-length (length match)) | 1985 | (match-length (length match)) |
| @@ -1989,7 +1989,7 @@ OFFSET is the position in STR at which the comparison takes place." | |||
| 1989 | (substring match 0 compare-length))))) | 1989 | (substring match 0 compare-length))))) |
| 1990 | 1990 | ||
| 1991 | (defun gdbmi-is-number (character) | 1991 | (defun gdbmi-is-number (character) |
| 1992 | "Return non-nil iff CHARACTER is a numerical character between 0 and 9." | 1992 | "Return non-nil if CHARACTER is a numerical character between 0 and 9." |
| 1993 | (and (>= character ?0) | 1993 | (and (>= character ?0) |
| 1994 | (<= character ?9))) | 1994 | (<= character ?9))) |
| 1995 | 1995 | ||
diff --git a/lisp/progmodes/js.el b/lisp/progmodes/js.el index cc9ee8fe67b..5be1373213e 100644 --- a/lisp/progmodes/js.el +++ b/lisp/progmodes/js.el | |||
| @@ -1302,7 +1302,7 @@ LIMIT defaults to point." | |||
| 1302 | (up-list -1))) | 1302 | (up-list -1))) |
| 1303 | 1303 | ||
| 1304 | (defun js--inside-param-list-p () | 1304 | (defun js--inside-param-list-p () |
| 1305 | "Return non-nil iff point is in a function parameter list." | 1305 | "Return non-nil if point is in a function parameter list." |
| 1306 | (ignore-errors | 1306 | (ignore-errors |
| 1307 | (save-excursion | 1307 | (save-excursion |
| 1308 | (js--up-nearby-list) | 1308 | (js--up-nearby-list) |
| @@ -1313,7 +1313,7 @@ LIMIT defaults to point." | |||
| 1313 | (looking-at "function")))))))) | 1313 | (looking-at "function")))))))) |
| 1314 | 1314 | ||
| 1315 | (defun js--inside-dojo-class-list-p () | 1315 | (defun js--inside-dojo-class-list-p () |
| 1316 | "Return non-nil iff point is in a Dojo multiple-inheritance class block." | 1316 | "Return non-nil if point is in a Dojo multiple-inheritance class block." |
| 1317 | (ignore-errors | 1317 | (ignore-errors |
| 1318 | (save-excursion | 1318 | (save-excursion |
| 1319 | (js--up-nearby-list) | 1319 | (js--up-nearby-list) |
| @@ -1352,7 +1352,7 @@ REGEXPS, but only if FRAMEWORK is in `js-enabled-frameworks'." | |||
| 1352 | (defun js--forward-destructuring-spec (&optional func) | 1352 | (defun js--forward-destructuring-spec (&optional func) |
| 1353 | "Move forward over a JavaScript destructuring spec. | 1353 | "Move forward over a JavaScript destructuring spec. |
| 1354 | If FUNC is supplied, call it with no arguments before every | 1354 | If FUNC is supplied, call it with no arguments before every |
| 1355 | variable name in the spec. Return true iff this was actually a | 1355 | variable name in the spec. Return true if this was actually a |
| 1356 | spec. FUNC must preserve the match data." | 1356 | spec. FUNC must preserve the match data." |
| 1357 | (pcase (char-after) | 1357 | (pcase (char-after) |
| 1358 | (?\[ | 1358 | (?\[ |
diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index d82eea05e1c..bcac59a3ade 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el | |||
| @@ -3228,7 +3228,7 @@ PREFIX is the prefix of the search regexp." | |||
| 3228 | 3228 | ||
| 3229 | (unless (fboundp 'region-exists-p) | 3229 | (unless (fboundp 'region-exists-p) |
| 3230 | (defun region-exists-p () | 3230 | (defun region-exists-p () |
| 3231 | "Non-nil iff the mark is set. Lobotomized version for Emacsen that do not provide their own." | 3231 | "Non-nil if the mark is set. Lobotomized version for Emacsen that do not provide their own." |
| 3232 | (mark))) | 3232 | (mark))) |
| 3233 | 3233 | ||
| 3234 | 3234 | ||
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 06d7a8fdffe..03c845851e2 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el | |||
| @@ -2361,7 +2361,7 @@ the value thus obtained, and the result is used instead." | |||
| 2361 | 2361 | ||
| 2362 | ;; I commented this out because nobody calls it -- rms. | 2362 | ;; I commented this out because nobody calls it -- rms. |
| 2363 | ;;(defun sh-abbrevs (ancestor &rest list) | 2363 | ;;(defun sh-abbrevs (ancestor &rest list) |
| 2364 | ;; "Iff it isn't, define the current shell as abbrev table and fill that. | 2364 | ;; "If it isn't, define the current shell as abbrev table and fill that. |
| 2365 | ;;Abbrev table will inherit all abbrevs from ANCESTOR, which is either an abbrev | 2365 | ;;Abbrev table will inherit all abbrevs from ANCESTOR, which is either an abbrev |
| 2366 | ;;table or a list of (NAME1 EXPANSION1 ...). In addition it will define abbrevs | 2366 | ;;table or a list of (NAME1 EXPANSION1 ...). In addition it will define abbrevs |
| 2367 | ;;according to the remaining arguments NAMEi EXPANSIONi ... | 2367 | ;;according to the remaining arguments NAMEi EXPANSIONi ... |
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el index ee5f8cb046b..84d7c15f76c 100644 --- a/lisp/progmodes/verilog-mode.el +++ b/lisp/progmodes/verilog-mode.el | |||
| @@ -3159,7 +3159,7 @@ and `verilog-scan'.") | |||
| 3159 | (setq verilog-scan-cache-tick nil)) | 3159 | (setq verilog-scan-cache-tick nil)) |
| 3160 | 3160 | ||
| 3161 | (defun verilog-scan-cache-ok-p () | 3161 | (defun verilog-scan-cache-ok-p () |
| 3162 | "Return t iff the scan cache is up to date." | 3162 | "Return t if the scan cache is up to date." |
| 3163 | (or (and verilog-scan-cache-preserving | 3163 | (or (and verilog-scan-cache-preserving |
| 3164 | (eq verilog-scan-cache-preserving (current-buffer)) | 3164 | (eq verilog-scan-cache-preserving (current-buffer)) |
| 3165 | verilog-scan-cache-tick) | 3165 | verilog-scan-cache-tick) |
diff --git a/lisp/textmodes/reftex-parse.el b/lisp/textmodes/reftex-parse.el index 40aa31a648b..71bec89a51d 100644 --- a/lisp/textmodes/reftex-parse.el +++ b/lisp/textmodes/reftex-parse.el | |||
| @@ -351,7 +351,7 @@ of master file." | |||
| 351 | docstruct)) | 351 | docstruct)) |
| 352 | 352 | ||
| 353 | (defun reftex-using-biblatex-p () | 353 | (defun reftex-using-biblatex-p () |
| 354 | "Return non-nil iff we are using biblatex rather than bibtex." | 354 | "Return non-nil if we are using biblatex rather than bibtex." |
| 355 | (if (boundp 'TeX-active-styles) | 355 | (if (boundp 'TeX-active-styles) |
| 356 | ;; the sophisticated AUCTeX way | 356 | ;; the sophisticated AUCTeX way |
| 357 | (member "biblatex" TeX-active-styles) | 357 | (member "biblatex" TeX-active-styles) |
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index cb37b4511bd..da7d7325a01 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2014-05-01 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * url-parse.el (url-generic-parse-url): Doc fix (replace `iff'). | ||
| 4 | |||
| 1 | 2014-03-26 Juanma Barranquero <lekktu@gmail.com> | 5 | 2014-03-26 Juanma Barranquero <lekktu@gmail.com> |
| 2 | 6 | ||
| 3 | * url-handlers.el (url-http-parse-response): Add autoload. | 7 | * url-handlers.el (url-http-parse-response): Add autoload. |
diff --git a/lisp/url/url-parse.el b/lisp/url/url-parse.el index 50de84f5167..0a811297986 100644 --- a/lisp/url/url-parse.el +++ b/lisp/url/url-parse.el | |||
| @@ -125,7 +125,7 @@ TARGET is the fragment identifier component (used to refer to a | |||
| 125 | ATTRIBUTES is nil; this slot originally stored the attribute and | 125 | ATTRIBUTES is nil; this slot originally stored the attribute and |
| 126 | value alists for IMAP URIs, but this feature was removed | 126 | value alists for IMAP URIs, but this feature was removed |
| 127 | since it conflicts with RFC 3986. | 127 | since it conflicts with RFC 3986. |
| 128 | FULLNESS is non-nil iff the hierarchical sequence component of | 128 | FULLNESS is non-nil if the hierarchical sequence component of |
| 129 | the URL starts with two slashes, \"//\". | 129 | the URL starts with two slashes, \"//\". |
| 130 | 130 | ||
| 131 | The parser follows RFC 3986, except that it also tries to handle | 131 | The parser follows RFC 3986, except that it also tries to handle |
diff --git a/src/ChangeLog b/src/ChangeLog index 17a32a4823f..12a0cd63dc0 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2014-05-01 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * floatfns.c (Fisnan): | ||
| 4 | * profiler.c (Fprofiler_cpu_running_p): Doc fix (replace `iff'). | ||
| 5 | |||
| 1 | 2014-05-01 Eli Zaretskii <eliz@gnu.org> | 6 | 2014-05-01 Eli Zaretskii <eliz@gnu.org> |
| 2 | 7 | ||
| 3 | * term.c (tty_menu_activate): A better initialization for cursor | 8 | * term.c (tty_menu_activate): A better initialization for cursor |
diff --git a/src/floatfns.c b/src/floatfns.c index ac0447ce6d6..75106a661b7 100644 --- a/src/floatfns.c +++ b/src/floatfns.c | |||
| @@ -1,7 +1,6 @@ | |||
| 1 | /* Primitive operations on floating point for GNU Emacs Lisp interpreter. | 1 | /* Primitive operations on floating point for GNU Emacs Lisp interpreter. |
| 2 | 2 | ||
| 3 | Copyright (C) 1988, 1993-1994, 1999, 2001-2014 Free Software Foundation, | 3 | Copyright (C) 1988, 1993-1994, 1999, 2001-2014 Free Software Foundation, Inc. |
| 4 | Inc. | ||
| 5 | 4 | ||
| 6 | Author: Wolfgang Rupprecht | 5 | Author: Wolfgang Rupprecht |
| 7 | (according to ack.texi) | 6 | (according to ack.texi) |
| @@ -142,7 +141,7 @@ DEFUN ("tan", Ftan, Stan, 1, 1, 0, | |||
| 142 | } | 141 | } |
| 143 | 142 | ||
| 144 | DEFUN ("isnan", Fisnan, Sisnan, 1, 1, 0, | 143 | DEFUN ("isnan", Fisnan, Sisnan, 1, 1, 0, |
| 145 | doc: /* Return non nil iff argument X is a NaN. */) | 144 | doc: /* Return non nil if argument X is a NaN. */) |
| 146 | (Lisp_Object x) | 145 | (Lisp_Object x) |
| 147 | { | 146 | { |
| 148 | CHECK_FLOAT (x); | 147 | CHECK_FLOAT (x); |
diff --git a/src/profiler.c b/src/profiler.c index 8b092dcc818..fff7c6b0ff6 100644 --- a/src/profiler.c +++ b/src/profiler.c | |||
| @@ -384,7 +384,7 @@ Return non-nil if the profiler was running. */) | |||
| 384 | DEFUN ("profiler-cpu-running-p", | 384 | DEFUN ("profiler-cpu-running-p", |
| 385 | Fprofiler_cpu_running_p, Sprofiler_cpu_running_p, | 385 | Fprofiler_cpu_running_p, Sprofiler_cpu_running_p, |
| 386 | 0, 0, 0, | 386 | 0, 0, 0, |
| 387 | doc: /* Return non-nil iff cpu profiler is running. */) | 387 | doc: /* Return non-nil if cpu profiler is running. */) |
| 388 | (void) | 388 | (void) |
| 389 | { | 389 | { |
| 390 | return profiler_cpu_running ? Qt : Qnil; | 390 | return profiler_cpu_running ? Qt : Qnil; |