diff options
| author | Mattias Engdegård | 2023-05-30 11:14:01 +0200 |
|---|---|---|
| committer | Mattias Engdegård | 2023-05-30 17:46:06 +0200 |
| commit | 845f97d475b2b1f963ab078a11e0baf5388dd5b2 (patch) | |
| tree | 5dc2c0b8c8903084796ea80616366a5dae499d61 | |
| parent | 9ae212fb1e5ef8cffd10ee174004caabf2027ba3 (diff) | |
| download | emacs-845f97d475b2b1f963ab078a11e0baf5388dd5b2.tar.gz emacs-845f97d475b2b1f963ab078a11e0baf5388dd5b2.zip | |
; * admin/admin.el (cusver-scan): remove broken warning
The call to `format-message` had no effect in itself, but it turns out
that actually emitting the result just results in useless warnings so
we remove it entirely.
| -rw-r--r-- | admin/admin.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/admin/admin.el b/admin/admin.el index 90f810b79c6..1f4c6986b0e 100644 --- a/admin/admin.el +++ b/admin/admin.el | |||
| @@ -1038,8 +1038,7 @@ If optional argument OLD is non-nil, also scan for `defvar's." | |||
| 1038 | (and grp | 1038 | (and grp |
| 1039 | (setq grp (car (cdr-safe grp))) ; (quote foo) -> foo | 1039 | (setq grp (car (cdr-safe grp))) ; (quote foo) -> foo |
| 1040 | (setq ver (assq grp glist)))) | 1040 | (setq ver (assq grp glist)))) |
| 1041 | (setq alist (cons (cons var ver) alist)))) | 1041 | (setq alist (cons (cons var ver) alist))))))) |
| 1042 | (if form (format-message "Malformed defcustom: `%s'" form))))) | ||
| 1043 | (message "%sdone" m) | 1042 | (message "%sdone" m) |
| 1044 | alist)) | 1043 | alist)) |
| 1045 | 1044 | ||