Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!uunet!seismo!sundc!pitstop!sun!amdcad!ames!aurora!labrea!jade!violet.berkeley.edu!jason
From: jason@violet.berkeley.edu (Jason Venner)
Newsgroups: comp.emacs
Subject: bug fix for monkey.el monkey-next-directory infinite loop bug
Message-ID: <5759@jade.BERKELEY.EDU>
Date: Tue, 3-Nov-87 13:21:55 EST
Article-I.D.: jade.5759
Posted: Tue Nov  3 13:21:55 1987
Date-Received: Sat, 7-Nov-87 06:01:01 EST
Sender: usenet@jade.BERKELEY.EDU
Reply-To: jason@violet.berkeley.edu (Jason Venner)
Organization: University of California, Berkeley
Lines: 29


If you hit M-p in monkey mode with no previous directorys opened,
monkey mode goes into a loop as it does not test for bobp in the
movement routine.

*** monkey.el	Tue Nov  3 10:18:05 1987
--- monkey.el.~1~	Thu Oct 22 10:50:02 1987
***************
*** 855,861 ****
       (save-excursion
         (while (> count 0)
  	 (catch 'found
! 	   (while (not (or (eobp) (bobp)))
  	     (forward-line direction)
  	     (and (monkey-expanded-p)
  		  (throw 'found nil)))
--- 855,861 ----
       (save-excursion
         (while (> count 0)
  	 (catch 'found
! 	   (while (not (eobp))
  	     (forward-line direction)
  	     (and (monkey-expanded-p)
  		  (throw 'found nil)))
Jason Venner
UUCP		{tektronix,dual,sun,ihnp4,decvax}!ucbvax!jade!jason
New style	jason@jade.berkeley.edu	
ARPA | CSNET	jason%jade@Berkeley.ARPA
BITNET		jason@ucbjade.BITNET