aboutsummaryrefslogtreecommitdiffstats
path: root/src/editfns.c
diff options
context:
space:
mode:
authorChong Yidong2012-12-21 15:51:33 +0800
committerChong Yidong2012-12-21 15:51:33 +0800
commit34b4b7eb7e862ef4e39f5d712757acef421a2c2b (patch)
treeea2a5b7d3d8a82311716bcaa45e57d93466e6ab2 /src/editfns.c
parent3eb050925927e7060cb5ba192bf1d0f954c5980b (diff)
downloademacs-34b4b7eb7e862ef4e39f5d712757acef421a2c2b.tar.gz
emacs-34b4b7eb7e862ef4e39f5d712757acef421a2c2b.zip
Make read-char-by-name signal an error for invalid input.
* international/mule-cmds.el (read-char-by-name): Signal an error if the user does not supply a valid character. * editfns.c (Finsert_char): Since read-char-by-name now signals an error for invalid chars, don't check for a nil return value. Fixes: debbugs:13177
Diffstat (limited to 'src/editfns.c')
-rw-r--r--src/editfns.c7
1 files changed, 3 insertions, 4 deletions
diff --git a/src/editfns.c b/src/editfns.c
index d7fe1c1c4c4..bb5cc437d9b 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -2361,10 +2361,9 @@ usage: (insert-before-markers-and-inherit &rest ARGS) */)
2361} 2361}
2362 2362
2363DEFUN ("insert-char", Finsert_char, Sinsert_char, 1, 3, 2363DEFUN ("insert-char", Finsert_char, Sinsert_char, 1, 3,
2364 "(list (or (read-char-by-name \"Insert character (Unicode name or hex): \")\ 2364 "(list (read-char-by-name \"Insert character (Unicode name or hex): \")\
2365 (error \"You did not specify a valid character\"))\ 2365 (prefix-numeric-value current-prefix-arg)\
2366 (prefix-numeric-value current-prefix-arg)\ 2366 t))",
2367 t))",
2368 doc: /* Insert COUNT copies of CHARACTER. 2367 doc: /* Insert COUNT copies of CHARACTER.
2369Interactively, prompt for CHARACTER. You can specify CHARACTER in one 2368Interactively, prompt for CHARACTER. You can specify CHARACTER in one
2370of these ways: 2369of these ways: