changeset 436:6e0a136fca4f

*** empty log message ***
author Michael I. Bushnell <mib@gnu.org>
date Tue, 26 Nov 1991 05:14:58 +0000
parents 43e88c4db330
children be739cb3c0fc
files lisp/startup.el src/xfns.c
diffstat 2 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Tue Nov 26 05:00:30 1991 +0000
+++ b/lisp/startup.el	Tue Nov 26 05:14:58 1991 +0000
@@ -148,7 +148,7 @@
 	   (setq version-control 'never))))
 
   ;; Choose a good default value for split-window-keep-point.
-  (setq split-window-keep-point (> baud-rate 2400))
+  (setq split-window-keep-point (> (baud-rate) 2400))
 
   ;; Read window system's init file if using a window system.
   (if (and window-system (not noninteractive))
--- a/src/xfns.c	Tue Nov 26 05:00:30 1991 +0000
+++ b/src/xfns.c	Tue Nov 26 05:14:58 1991 +0000
@@ -1424,6 +1424,7 @@
      enum resource_types type;
 {
   register Lisp_Object tem;
+  int i;
 
   tem = Fassq (param, alist);
   if (EQ (tem, Qnil))
@@ -4417,9 +4418,9 @@
   defsubr (&Sx_defined_color);
 #if 0
   defsubr (&Sx_track_pointer);
-#endif
   defsubr (&Sx_grab_pointer);
   defsubr (&Sx_ungrab_pointer);
+#endif
 #else
   defsubr (&Sx_get_default);
   defsubr (&Sx_store_cut_buffer);