changeset 806:d42e1151eed8

*** empty log message ***
author Jim Blandy <jimb@redhat.com>
date Thu, 16 Jul 1992 21:47:30 +0000
parents 10f8af91ab47
children 4f28bd14272c
files lisp/emacs-lisp/disass.el lisp/frame.el lisp/gud.el lisp/x-menu.el src/fileio.c
diffstat 5 files changed, 10 insertions(+), 14 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/disass.el	Thu Jul 16 21:46:36 1992 +0000
+++ b/lisp/emacs-lisp/disass.el	Thu Jul 16 21:47:30 1992 +0000
@@ -9,7 +9,7 @@
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -25,7 +25,7 @@
 ;;; The variable byte-code-vector is defined by the new bytecomp.el.
 ;;; The function byte-decompile-lapcode is defined in byte-opt.el.
 ;;; Since we don't use byte-decompile-lapcode, let's try not loading byte-opt.
-(require 'bytecomp)
+(require 'byte-compile)
 
 (defvar disassemble-column-1-indent 5 "*")
 (defvar disassemble-column-2-indent 10 "*")
--- a/lisp/frame.el	Thu Jul 16 21:46:36 1992 +0000
+++ b/lisp/frame.el	Thu Jul 16 21:47:30 1992 +0000
@@ -9,7 +9,7 @@
 ;;;
 ;;; GNU Emacs is free software; you can redistribute it and/or modify
 ;;; it under the terms of the GNU General Public License as published by
-;;; the Free Software Foundation; either version 1, or (at your option)
+;;; the Free Software Foundation; either version 2, or (at your option)
 ;;; any later version.
 ;;;
 ;;; GNU Emacs is distributed in the hope that it will be useful,
--- a/lisp/gud.el	Thu Jul 16 21:46:36 1992 +0000
+++ b/lisp/gud.el	Thu Jul 16 21:47:30 1992 +0000
@@ -1,11 +1,12 @@
 ;; Grand Unified Debugger mode --- run gdb, sdb, dbx under Emacs control
+;; Copyright (c) 1992 Free Software Foundation, Inc.
 ;;	@(#)gud.el	1.10
 
 ;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -23,11 +24,6 @@
 ;; The overloading code was then rewritten by Barry Warsaw <bwarsaw@cen.com>,
 ;; who also hacked the mode to use comint.el.
 
-;; Note: use of this package with sdb requires that your tags.el support
-;; the find-tag-noselect entry point.  Stock distributions up to 18.57 do 
-;; *not* include this feature; if it's not included with this file, email
-;; eric@snark.thyrsus.com for it or get 18.58.
-
 (require 'comint)
 (require 'tags)
 
--- a/lisp/x-menu.el	Thu Jul 16 21:46:36 1992 +0000
+++ b/lisp/x-menu.el	Thu Jul 16 21:47:30 1992 +0000
@@ -9,7 +9,7 @@
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -107,7 +107,7 @@
   (let ((buf (current-buffer)))
     (pop-to-buffer menu)
     (let (buffer-read-only)
-      (setq x-menu-max-width (1- (screen-width)))
+      (setq x-menu-max-width (1- (frame-width)))
       (setq x-menu-item-width 0)
       (let (items-head
 	    (items-tail x-menu-items-alist))
--- a/src/fileio.c	Thu Jul 16 21:46:36 1992 +0000
+++ b/src/fileio.c	Thu Jul 16 21:47:30 1992 +0000
@@ -2470,11 +2470,11 @@
 
   ring_bell ();
   message ("Autosaving...error for %s", name);
-  Fsleep_for (make_number (1));
+  Fsleep_for (make_number (1), Qnil);
   message ("Autosaving...error!for %s", name);
-  Fsleep_for (make_number (1));
+  Fsleep_for (make_number (1), Qnil);
   message ("Autosaving...error for %s", name);
-  Fsleep_for (make_number (1));
+  Fsleep_for (make_number (1), Qnil);
   return Qnil;
 }