diff options
| author | Paul Eggert | 2020-01-04 11:17:12 -0800 |
|---|---|---|
| committer | Paul Eggert | 2020-01-04 11:18:13 -0800 |
| commit | f95a2b83014a810d508448473b20186d55485efd (patch) | |
| tree | a3105cbaae99ee1142db93d718cbc814eea56a28 /lisp/cedet/srecode | |
| parent | 28727444f1c12f0b5f1fffa4cfa66032f8f16c2d (diff) | |
| download | emacs-f95a2b83014a810d508448473b20186d55485efd.tar.gz emacs-f95a2b83014a810d508448473b20186d55485efd.zip | |
Fix some broken conditional forms
Problem reported by Mattias Engdegård in:
https://lists.gnu.org/r/emacs-devel/2020-01/msg00088.html
* lisp/cedet/ede/cpp-root.el (ede-create-lots-of-projects-under-dir):
Remove this quick hack, which didn’t do anything anyway.
* lisp/cedet/ede/pconf.el (ede-proj-configure-test-required-file):
* lisp/emacs-lisp/tabulated-list.el (tabulated-list-print-col):
* lisp/net/nsm.el (nsm-check-tls-connection):
Use ‘when’ rather than bypassing it. This doesn’t affect behavior
and is better style.
* lisp/cedet/srecode/semantic.el (srecode-semantic-handle-:tag):
Fix typo that suppressed an error.
* lisp/filesets.el (filesets-run-cmd): Fix typo that mishandled spacing.
* lisp/gnus/gnus-cloud.el (gnus-cloud-update-newsrc-data):
Fix typo that caused “GROUP has older different info in the cloud
as of DATE, update it here?” prompt result to always be treated as
“yes”.
* lisp/gnus/mml-smime.el (mml-smime-openssl-encrypt): Simplify,
since smime-encrypt-buffer signals error on failure.
* lisp/international/titdic-cnv.el (tsang-quick-converter): Simplify.
The conversion of this file to utf-8-emacs in
2019-01-08T02:18:40Z!monnier@iro.umontreal.ca removed the
distinction between Big5 and CNS fulltitles in the generated docstring.
* lisp/org/org-agenda.el (org-agenda-show-and-scroll-up):
* lisp/textmodes/table.el (table--generate-source-cell-contents):
Simplify by removing useless code.
* lisp/org/ox-odt.el (org-odt--format-timestamp): Fix typo that
always output time-of-day even when the timestamp lacked it.
Diffstat (limited to 'lisp/cedet/srecode')
| -rw-r--r-- | lisp/cedet/srecode/semantic.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/cedet/srecode/semantic.el b/lisp/cedet/srecode/semantic.el index 26c14892efd..5b2dd034743 100644 --- a/lisp/cedet/srecode/semantic.el +++ b/lisp/cedet/srecode/semantic.el | |||
| @@ -201,7 +201,7 @@ variable default values, and other things." | |||
| 201 | (let ((tag (or srecode-semantic-selected-tag | 201 | (let ((tag (or srecode-semantic-selected-tag |
| 202 | (srecode-semantic-tag-from-kill-ring)))) | 202 | (srecode-semantic-tag-from-kill-ring)))) |
| 203 | (when (not tag) | 203 | (when (not tag) |
| 204 | "No tag for current template. Use the semantic kill-ring.") | 204 | (error "No tag for current template. Use the semantic kill-ring.")) |
| 205 | (srecode-semantic-apply-tag-to-dict | 205 | (srecode-semantic-apply-tag-to-dict |
| 206 | (srecode-semantic-tag (semantic-tag-name tag) | 206 | (srecode-semantic-tag (semantic-tag-name tag) |
| 207 | :prime tag) | 207 | :prime tag) |