Mercurial > hg > xemacs-beta

comparison lib-src/gnuclient.c @ 462:0784d089fdc9 r21-2-46

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-46
author cvs
date Mon, 13 Aug 2007 11:44:37 +0200
parents c33ae14dd6d0
children 5aa1854ad537
comparison
equal deleted inserted replaced
461:120ed4009e51 462:0784d089fdc9
639 sprintf (command, "(gnuserv-edit-files '(tty %s %s %d) '(", 639 sprintf (command, "(gnuserv-edit-files '(tty %s %s %d) '(",
640 clean_string (tty), clean_string (term), (int)getpid ()); 640 clean_string (tty), clean_string (term), (int)getpid ());
641 } 641 }
642 else /* !suppress_windows_system */ 642 else /* !suppress_windows_system */
643 { 643 {
644 if (display) 644 if (0)
645 ;
646 #ifdef HAVE_X_WINDOWS
647 else if (display)
645 sprintf (command, "(gnuserv-edit-files '(x %s) '(", 648 sprintf (command, "(gnuserv-edit-files '(x %s) '(",
646 clean_string (display)); 649 clean_string (display));
650 #endif
651 #ifdef HAVE_GTK
652 else if (display)
653 strcpy (command, "(gnuserv-edit-files '(gtk nil) '(");
654 #endif
647 #ifdef HAVE_MS_WINDOWS 655 #ifdef HAVE_MS_WINDOWS
648 else 656 else
649 sprintf (command, "(gnuserv-edit-files '(mswindows nil) '("); 657 sprintf (command, "(gnuserv-edit-files '(mswindows nil) '(");
650 #endif 658 #endif
651 } /* !suppress_windows_system */ 659 } /* !suppress_windows_system */