Mercurial > hg > xemacs-beta

diff src/console-tty.c @ 20:859a2309aef8 r19-15b93

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b93
author cvs
date Mon, 13 Aug 2007 08:50:05 +0200
parents 0293115a14e9
children ec9a17fef872
line wrap: on
line diff
--- a/src/console-tty.c	Mon Aug 13 08:49:44 2007 +0200
+++ b/src/console-tty.c	Mon Aug 13 08:50:05 2007 +0200
@@ -189,12 +189,10 @@
   return XCONSOLE (console);
 }
 
-DEFUN ("console-tty-terminal-type", Fconsole_tty_terminal_type,
-       Sconsole_tty_terminal_type, 0, 1, 0 /*
+DEFUN ("console-tty-terminal-type", Fconsole_tty_terminal_type, 0, 1, 0, /*
 Return the terminal type of TTY console CONSOLE.
-*/ )
-     (console)
-     Lisp_Object console;
+*/
+       (console))
 {
   return CONSOLE_TTY_DATA (decode_tty_console (console))->terminal_type;
 }
@@ -239,7 +237,7 @@
 void
 syms_of_console_tty (void)
 {
-  defsubr (&Sconsole_tty_terminal_type);
+  DEFSUBR (Fconsole_tty_terminal_type);
   defsymbol (&Qterminal_type, "terminal-type");
 }