Spelling fixes

This commit is contained in:
Paul Eggert 2016-01-30 20:05:26 -08:00
parent 93b144bbaa
commit b920a0ee6b
2 changed files with 3 additions and 5 deletions

View file

@ -1036,7 +1036,7 @@ VERSION is of the format (Major . Minor)"
(define-abbrev-table 'prolog-mode-abbrev-table ()) (define-abbrev-table 'prolog-mode-abbrev-table ())
;; Becauses this can `eval' its arguments, any variable that gets ;; Because this can `eval' its arguments, any variable that gets
;; processed by it should be marked as :risky. ;; processed by it should be marked as :risky.
(defun prolog-find-value-by-system (alist) (defun prolog-find-value-by-system (alist)
"Get value from ALIST according to `prolog-system'." "Get value from ALIST according to `prolog-system'."

View file

@ -446,10 +446,8 @@ is nil if SYM is not a symbol that names a cell."
(ses-get-cell (car rowcol) (cdr rowcol))))))) (ses-get-cell (car rowcol) (cdr rowcol)))))))
(defun ses-plist-delq (plist prop) (defun ses-plist-delq (plist prop)
"Return PLIST after deletion of proprerty/value pair. "Return PLIST after deleting the first pair (if any) with symbol PROP.
This can alter PLIST."
PROP is the symbol identifying the property/value pair. PLIST may
be modified by border effect."
(cond (cond
((null plist) nil) ((null plist) nil)
((eq (car plist) prop) (cddr plist)) ((eq (car plist) prop) (cddr plist))