Mercurial > hg > xemacs-beta

comparison src/select-msw.c @ 2286:04bc9d2f42c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-20 19:18:55 by james] Mark all unused parameters as unused. Also eliminate some unneeded local variables.
author james
date Mon, 20 Sep 2004 19:20:08 +0000
parents a8d8f419b459
children 304aebb79cd3
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
225 static Lisp_Object 225 static Lisp_Object
226 mswindows_own_selection (Lisp_Object selection_name, 226 mswindows_own_selection (Lisp_Object selection_name,
227 Lisp_Object selection_value, 227 Lisp_Object selection_value,
228 Lisp_Object how_to_add, 228 Lisp_Object how_to_add,
229 Lisp_Object selection_type, 229 Lisp_Object selection_type,
230 int owned_p /* Not used */) 230 int UNUSED (owned_p))
231 { 231 {
232 HGLOBAL hValue = NULL; 232 HGLOBAL hValue = NULL;
233 UINT cfType; 233 UINT cfType;
234 int is_X_type = FALSE; 234 int is_X_type = FALSE;
235 Lisp_Object cfObject; 235 Lisp_Object cfObject;
582 else 582 else
583 return value; 583 return value;
584 } 584 }
585 585
586 static void 586 static void
587 mswindows_disown_selection (Lisp_Object selection, Lisp_Object timeval) 587 mswindows_disown_selection (Lisp_Object selection,
588 Lisp_Object UNUSED (timeval))
588 { 589 {
589 if (EQ (selection, QCLIPBOARD)) 590 if (EQ (selection, QCLIPBOARD))
590 { 591 {
591 BOOL success = OpenClipboard (NULL); 592 BOOL success = OpenClipboard (NULL);
592 if (success) 593 if (success)