# HG changeset patch # User Richard M. Stallman # Date 768767237 0 # Node ID d1cbb5dd343462c0982d717a94354846ee633674 # Parent 89ad22aef9776f592ec37a155eaf1e4305b802e6 (outline-init): Delete junk at end. diff -r 89ad22aef977 -r d1cbb5dd3434 lisp/allout.el --- a/lisp/allout.el Thu May 12 18:04:36 1994 +0000 +++ b/lisp/allout.el Thu May 12 18:27:17 1994 +0000 @@ -5,7 +5,7 @@ ;; Author: Ken Manheimer ;; Maintainer: Ken Manheimer ;; Created: Dec 1991 - first release to usenet -;; Version: $Id: allout.el,v 4.1 1994/05/05 23:52:43 klm Exp klm $|| +;; Version: $Id: allout.el,v 1.7 1994/05/09 06:36:19 rms Exp rms $|| ;; Keywords: outline mode ;; This file is part of GNU Emacs. @@ -408,7 +408,7 @@ ;;;_ - Version ;;;_ = outline-version (defvar outline-version - (let ((rcs-rev "$Revision: 4.1 $")) + (let ((rcs-rev "$Revision: 1.7 $")) (condition-case err (save-match-data (string-match "\\$Revision: \\([0-9]+\\.[0-9]+\\)" rcs-rev) @@ -782,9 +782,7 @@ 'ask) ((message "Allout outline mode auto-activation and -layout enabled.") - t))) - -t))))) + t))))) ;;;_ > outline-mode (&optional toggle) ;;;_ : Defun: (defun outline-mode (&optional toggle)