diff options
author | Richard M. Stallman <rms@gnu.org> | 1993-05-27 04:01:13 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1993-05-27 04:01:13 +0000 |
commit | 1eb4d468b5f4dfdbfe5170aada0b686c3eae0502 (patch) | |
tree | 89629084fa2cf95cab030286038c7ac4a2e7c6ab /src/xselect.c | |
parent | a6c87ac86c19d32e47b4ff5ca147eeaa49f4222e (diff) | |
download | emacs-1eb4d468b5f4dfdbfe5170aada0b686c3eae0502.tar.gz |
(x_get_local_selection): If no conversion function
exists for the requested type, just return nil.
Diffstat (limited to 'src/xselect.c')
-rw-r--r-- | src/xselect.c | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/src/xselect.c b/src/xselect.c index 1e811105504..d239893d3e8 100644 --- a/src/xselect.c +++ b/src/xselect.c @@ -357,13 +357,12 @@ x_get_local_selection (selection_symbol, target_type) CHECK_SYMBOL (target_type, 0); handler_fn = Fcdr (Fassq (target_type, Vselection_converter_alist)); - if (NILP (handler_fn)) - Fsignal (Qerror, - Fcons (build_string ("missing selection-conversion function"), - Fcons (target_type, Fcons (value, Qnil)))); - value = call3 (handler_fn, - selection_symbol, target_type, - XCONS (XCONS (local_value)->cdr)->car); + if (!NILP (handler_fn)) + value = call3 (handler_fn, + selection_symbol, target_type, + XCONS (XCONS (local_value)->cdr)->car); + else + value = Qnil; unbind_to (count, Qnil); } |