From 3b108f0825705e6b067844a16138a47c66273f88 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 14 Oct 2002 10:24:29 +0000 Subject: [PATCH] (syms_of_win16select): Fix docstring for `selection-coding-system'. --- src/w16select.c | 32 ++++++++++++++++---------------- 1 file changed, 16 insertions(+), 16 deletions(-) diff --git a/src/w16select.c b/src/w16select.c index 98c915ec5d1..a0c18bfc813 100644 --- a/src/w16select.c +++ b/src/w16select.c @@ -1,6 +1,6 @@ /* 16-bit Windows Selection processing for emacs on MS-Windows Copyright (C) 1996, 1997 Free Software Foundation. - + This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify @@ -169,7 +169,7 @@ unsigned empty_clipboard () { __dpmi_regs regs; - + /* Calls Int 2Fh/AX=1702h Return Values AX == 0: Error occurred <> 0: OK, Clipboard emptied */ @@ -400,7 +400,7 @@ get_clipboard_data (Format, Data, Size, Raw) the next loop by an additional test. */ register unsigned char *lcdp = last_clipboard_text == NULL ? &null_char : last_clipboard_text; - + /* Copy data from low memory, remove CR characters before LF if needed. */ _farsetsel (_dos_ds); @@ -493,14 +493,14 @@ DEFUN ("w16-set-clipboard-data", Fw16_set_clipboard_data, Sw16_set_clipboard_dat int no_crlf_conversion; CHECK_STRING (string, 0); - + if (NILP (frame)) frame = Fselected_frame (); CHECK_LIVE_FRAME (frame, 0); if ( !FRAME_MSDOS_P (XFRAME (frame))) goto done; - + BLOCK_INPUT; nbytes = STRING_BYTES (XSTRING (string)); @@ -544,7 +544,7 @@ DEFUN ("w16-set-clipboard-data", Fw16_set_clipboard_data, Sw16_set_clipboard_dat if (!open_clipboard ()) goto error; - + ok = empty_clipboard () && ((put_status = set_clipboard_data (CF_OEMTEXT, src, nbytes, no_crlf_conversion)) @@ -553,11 +553,11 @@ DEFUN ("w16-set-clipboard-data", Fw16_set_clipboard_data, Sw16_set_clipboard_dat if (!no_crlf_conversion) Vlast_coding_system_used = Qraw_text; close_clipboard (); - + if (ok) goto unblock; error: - + ok = 0; unblock: @@ -586,7 +586,7 @@ DEFUN ("w16-set-clipboard-data", Fw16_set_clipboard_data, Sw16_set_clipboard_dat } sit_for (2, 0, 0, 1, 1); } - + done: return (ok && put_status == 0 ? string : Qnil); @@ -609,9 +609,9 @@ DEFUN ("w16-get-clipboard-data", Fw16_get_clipboard_data, Sw16_get_clipboard_dat CHECK_LIVE_FRAME (frame, 0); if ( !FRAME_MSDOS_P (XFRAME (frame))) goto done; - + BLOCK_INPUT; - + if (!open_clipboard ()) goto unblock; @@ -686,9 +686,9 @@ DEFUN ("w16-get-clipboard-data", Fw16_get_clipboard_data, Sw16_get_clipboard_dat unblock: UNBLOCK_INPUT; - + done: - + return (ret); } @@ -737,7 +737,7 @@ and t is the same as `SECONDARY'.") return Qnil; } -void +void syms_of_win16select () { defsubr (&Sw16_set_clipboard_data); @@ -748,8 +748,8 @@ syms_of_win16select () "Coding system for communicating with other X clients.\n\ When sending or receiving text via cut_buffer, selection, and clipboard,\n\ the text is encoded or decoded by this coding system.\n\ -A default value is `iso-latin-1-dos'"); - Vselection_coding_system=intern ("iso-latin-1-dos"); +The default value is `iso-latin-1-dos'."); + Vselection_coding_system = intern ("iso-latin-1-dos"); DEFVAR_LISP ("next-selection-coding-system", &Vnext_selection_coding_system, "Coding system for the next communication with other X clients.\n\ -- 2.39.2