diff options
| author | Richard M. Stallman | 1993-05-27 04:01:13 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-05-27 04:01:13 +0000 |
| commit | 1eb4d468b5f4dfdbfe5170aada0b686c3eae0502 (patch) | |
| tree | 89629084fa2cf95cab030286038c7ac4a2e7c6ab | |
| parent | a6c87ac86c19d32e47b4ff5ca147eeaa49f4222e (diff) | |
| download | emacs-1eb4d468b5f4dfdbfe5170aada0b686c3eae0502.tar.gz emacs-1eb4d468b5f4dfdbfe5170aada0b686c3eae0502.zip | |
(x_get_local_selection): If no conversion function
exists for the requested type, just return nil.
| -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) | |||
| 357 | 357 | ||
| 358 | CHECK_SYMBOL (target_type, 0); | 358 | CHECK_SYMBOL (target_type, 0); |
| 359 | handler_fn = Fcdr (Fassq (target_type, Vselection_converter_alist)); | 359 | handler_fn = Fcdr (Fassq (target_type, Vselection_converter_alist)); |
| 360 | if (NILP (handler_fn)) | 360 | if (!NILP (handler_fn)) |
| 361 | Fsignal (Qerror, | 361 | value = call3 (handler_fn, |
| 362 | Fcons (build_string ("missing selection-conversion function"), | 362 | selection_symbol, target_type, |
| 363 | Fcons (target_type, Fcons (value, Qnil)))); | 363 | XCONS (XCONS (local_value)->cdr)->car); |
| 364 | value = call3 (handler_fn, | 364 | else |
| 365 | selection_symbol, target_type, | 365 | value = Qnil; |
| 366 | XCONS (XCONS (local_value)->cdr)->car); | ||
| 367 | unbind_to (count, Qnil); | 366 | unbind_to (count, Qnil); |
| 368 | } | 367 | } |
| 369 | 368 | ||