Mercurial > hg > xemacs-beta
comparison lib-src/gnuclient.c @ 286:57709be46d1b r21-0b41
Import from CVS: tag r21-0b41
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:35:03 +0200 |
parents | 90d73dddcdc4 |
children | 6cb5e14cd98e |
comparison
equal
deleted
inserted
replaced
285:9a3756523c1b | 286:57709be46d1b |
---|---|
321 #endif | 321 #endif |
322 if (!tmpdir) | 322 if (!tmpdir) |
323 tmpdir = "/tmp"; | 323 tmpdir = "/tmp"; |
324 | 324 |
325 display = getenv ("DISPLAY"); | 325 display = getenv ("DISPLAY"); |
326 if (!display) | 326 if (display) |
327 display = my_strdup (display); | |
328 #ifndef HAVE_MS_WINDOWS | |
329 else | |
327 suppress_windows_system = 1; | 330 suppress_windows_system = 1; |
328 else | 331 #endif |
329 display = my_strdup (display); | |
330 | 332 |
331 for (i = 1; argv[i] && !errflg; i++) | 333 for (i = 1; argv[i] && !errflg; i++) |
332 { | 334 { |
333 if (*argv[i] != '-') | 335 if (*argv[i] != '-') |
334 break; | 336 break; |
592 sprintf (command, "(gnuserv-edit-files '(tty %s %s %d) '(", | 594 sprintf (command, "(gnuserv-edit-files '(tty %s %s %d) '(", |
593 clean_string (tty), clean_string (term), (int)getpid ()); | 595 clean_string (tty), clean_string (term), (int)getpid ()); |
594 } | 596 } |
595 else /* !suppress_windows_system */ | 597 else /* !suppress_windows_system */ |
596 { | 598 { |
597 sprintf (command, "(gnuserv-edit-files '(x %s) '(", | 599 if (display) |
598 clean_string (display)); | 600 sprintf (command, "(gnuserv-edit-files '(x %s) '(", |
601 clean_string (display)); | |
602 #ifdef HAVE_MS_WINDOWS | |
603 else | |
604 sprintf (command, "(gnuserv-edit-files '(mswindows nil) '("); | |
605 #endif | |
599 } /* !suppress_windows_system */ | 606 } /* !suppress_windows_system */ |
600 send_string (s, command); | 607 send_string (s, command); |
601 | 608 |
602 if (!argv[i]) | 609 if (!argv[i]) |
603 nofiles = 1; | 610 nofiles = 1; |