Mercurial > hg > xemacs-beta

comparison src/event-Xt.c @ 1726:a8d8f419b459

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-09-30 15:26:34 by james] Add type information to xfree to avoid alias creation.
author james
date Tue, 30 Sep 2003 15:27:01 +0000
parents 210683f31426
children beb716b23f5b
comparison
equal deleted inserted replaced
1725:7ff8f4d70aec 1726:a8d8f419b459
1404 len = strlen ((char*)data); 1404 len = strlen ((char*)data);
1405 hurl = dnd_url_hexify_string ((char *)data, "file:"); 1405 hurl = dnd_url_hexify_string ((char *)data, "file:");
1406 l_item = make_string ((Ibyte *)hurl, strlen (hurl)); 1406 l_item = make_string ((Ibyte *)hurl, strlen (hurl));
1407 l_dndlist = Fcons (l_item, l_dndlist); 1407 l_dndlist = Fcons (l_item, l_dndlist);
1408 data += len + 1; 1408 data += len + 1;
1409 xfree (hurl); 1409 xfree (hurl, char *);
1410 } 1410 }
1411 l_type = Qdragdrop_URL; 1411 l_type = Qdragdrop_URL;
1412 } 1412 }
1413 break; 1413 break;
1414 case DndText: 1414 case DndText:
1441 1441
1442 l_dndlist = list1 ( make_string ((Ibyte *)hurl, 1442 l_dndlist = list1 ( make_string ((Ibyte *)hurl,
1443 strlen (hurl)) ); 1443 strlen (hurl)) );
1444 l_type = Qdragdrop_URL; 1444 l_type = Qdragdrop_URL;
1445 1445
1446 xfree (hurl); 1446 xfree (hurl, char *);
1447 } 1447 }
1448 break; 1448 break;
1449 case DndURL: 1449 case DndURL:
1450 /* as it is a real URL it should already be escaped 1450 /* as it is a real URL it should already be escaped
1451 and escaping again will break them (cause % is unsave) */ 1451 and escaping again will break them (cause % is unsave) */
2346 assert (tty_events_occurred > 0); 2346 assert (tty_events_occurred > 0);
2347 tty_events_occurred--; 2347 tty_events_occurred--;
2348 } 2348 }
2349 } 2349 }
2350 XtRemoveInput (closure->id); 2350 XtRemoveInput (closure->id);
2351 xfree (closure); 2351 xfree (closure, struct what_is_ready_closure *);
2352 filedesc_to_what_closure[fd] = 0; 2352 filedesc_to_what_closure[fd] = 0;
2353 } 2353 }
2354 2354
2355 static void 2355 static void
2356 emacs_Xt_select_process (Lisp_Process *process, int doin, int doerr) 2356 emacs_Xt_select_process (Lisp_Process *process, int doin, int doerr)