diff options
| author | Richard M. Stallman | 1998-07-11 20:42:12 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-07-11 20:42:12 +0000 |
| commit | 93e4ce1b88af9466a13bd876a73ee60ded1a6052 (patch) | |
| tree | a67fdaacf2ae643fcfca1e7a4065b8de0adeda3c /src/xselect.c | |
| parent | 59588cd48bd100ace7bea70b10c7c4b85de30cf1 (diff) | |
| download | emacs-93e4ce1b88af9466a13bd876a73ee60ded1a6052.tar.gz emacs-93e4ce1b88af9466a13bd876a73ee60ded1a6052.zip | |
(Vselection_coding_system):
Renamed from Vclipboard_coding_system. All uses changed.
(syms_of_xselect): Rename Lisp variable.
Diffstat (limited to 'src/xselect.c')
| -rw-r--r-- | src/xselect.c | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/src/xselect.c b/src/xselect.c index 713db184ef8..b05a21ea453 100644 --- a/src/xselect.c +++ b/src/xselect.c | |||
| @@ -49,7 +49,7 @@ static Lisp_Object Vx_lost_selection_hooks; | |||
| 49 | static Lisp_Object Vx_sent_selection_hooks; | 49 | static Lisp_Object Vx_sent_selection_hooks; |
| 50 | /* Coding system for communicating with other X clients via cutbuffer, | 50 | /* Coding system for communicating with other X clients via cutbuffer, |
| 51 | selection, and clipboard. */ | 51 | selection, and clipboard. */ |
| 52 | static Lisp_Object Vclipboard_coding_system; | 52 | static Lisp_Object Vselection_coding_system; |
| 53 | 53 | ||
| 54 | /* If this is a smaller number than the max-request-size of the display, | 54 | /* If this is a smaller number than the max-request-size of the display, |
| 55 | emacs will use INCR selection transfer when the selection is larger | 55 | emacs will use INCR selection transfer when the selection is larger |
| @@ -1505,7 +1505,7 @@ selection_data_to_lisp_data (display, data, size, type, format) | |||
| 1505 | struct coding_system coding; | 1505 | struct coding_system coding; |
| 1506 | 1506 | ||
| 1507 | setup_coding_system | 1507 | setup_coding_system |
| 1508 | (Fcheck_coding_system(Vclipboard_coding_system), &coding); | 1508 | (Fcheck_coding_system(Vselection_coding_system), &coding); |
| 1509 | coding.mode |= CODING_MODE_LAST_BLOCK; | 1509 | coding.mode |= CODING_MODE_LAST_BLOCK; |
| 1510 | bufsize = decoding_buffer_size (&coding, size); | 1510 | bufsize = decoding_buffer_size (&coding, size); |
| 1511 | buf = (unsigned char *) xmalloc (bufsize); | 1511 | buf = (unsigned char *) xmalloc (bufsize); |
| @@ -1644,7 +1644,7 @@ lisp_data_to_selection_data (display, obj, | |||
| 1644 | struct coding_system coding; | 1644 | struct coding_system coding; |
| 1645 | 1645 | ||
| 1646 | setup_coding_system | 1646 | setup_coding_system |
| 1647 | (Fcheck_coding_system (Vclipboard_coding_system), &coding); | 1647 | (Fcheck_coding_system (Vselection_coding_system), &coding); |
| 1648 | coding.mode |= CODING_MODE_LAST_BLOCK; | 1648 | coding.mode |= CODING_MODE_LAST_BLOCK; |
| 1649 | bufsize = encoding_buffer_size (&coding, *size_ret); | 1649 | bufsize = encoding_buffer_size (&coding, *size_ret); |
| 1650 | buf = (unsigned char *) xmalloc (bufsize); | 1650 | buf = (unsigned char *) xmalloc (bufsize); |
| @@ -2281,13 +2281,12 @@ This hook doesn't let you change the behavior of Emacs's selection replies,\n\ | |||
| 2281 | it merely informs you that they have happened."); | 2281 | it merely informs you that they have happened."); |
| 2282 | Vx_sent_selection_hooks = Qnil; | 2282 | Vx_sent_selection_hooks = Qnil; |
| 2283 | 2283 | ||
| 2284 | DEFVAR_LISP ("clipboard-coding-system", &Vclipboard_coding_system, | 2284 | DEFVAR_LISP ("selection-coding-system", &Vselection_coding_system, |
| 2285 | "Coding system for communicating with other X clients.\n\ | 2285 | "Coding system for communicating with other X clients.\n\ |
| 2286 | When sending or receiving text via cut_buffer, selection, and clipboard,\n\ | 2286 | When sending or receiving text via cut_buffer, selection, and clipboard,\n\ |
| 2287 | the text is encoded or decoded by this coding system.\n\ | 2287 | the text is encoded or decoded by this coding system.\n\ |
| 2288 | A default value is `compound-text'"); | 2288 | A default value is `compound-text'"); |
| 2289 | Vclipboard_coding_system=intern ("compound-text"); | 2289 | Vselection_coding_system = intern ("compound-text"); |
| 2290 | staticpro(&Vclipboard_coding_system); | ||
| 2291 | 2290 | ||
| 2292 | DEFVAR_INT ("x-selection-timeout", &x_selection_timeout, | 2291 | DEFVAR_INT ("x-selection-timeout", &x_selection_timeout, |
| 2293 | "Number of milliseconds to wait for a selection reply.\n\ | 2292 | "Number of milliseconds to wait for a selection reply.\n\ |