Proposed Extreme changes.

['john heasley']

Fri, Oct 19, 2001 at 10:26:18AM -0700, Alex Bochannek:
> One more diff:
> 
> bash-2.03$ diff -c clogin clogin.new 
> *** clogin      Fri Oct 19 10:20:07 2001
> --- clogin.new  Fri Oct 19 10:21:21 2001
> ***************
> *** 491,497 ****
>                                                   exp_continue }
>                 -re "\[^\r\n]*Press <SPACE> to cont\[^\r\n]*"   { send " "
>                                                   expect {
> !                                                       -re "\[\r\n]*\r\r"
> {}
>                                                   }
>                                                   exp_continue
>                                                 }
> --- 491,499 ----
>                                                   exp_continue }
>                 -re "\[^\r\n]*Press <SPACE> to cont\[^\r\n]*"   { send " "
>                                                   expect {
> !                                                       # gag, 2 more
> prompts
> !                                                       -re "\[\r\n]*\r" {}
> !                                                       -re "\[^\r\n]*Press
> <SPACE> to cont\[^\r\n]*"   { send " "; exp_continue }
>                                                   }
>                                                   exp_continue
>                                                 }

other than collection not working when the config is unsaved, are folks
having trouble with collection on extremes?  the 3 three i have access
to have not exhibited any problems (caused by rancid anyway).

i havent seen this double more prompt oddness.  does the following deal
with it (more cleanly?)?

Index: clogin.in
===================================================================
RCS file: /home/rancid/.CVS/rancid/bin/clogin.in,v
retrieving revision 1.41
diff -c -r1.41 clogin.in
*** clogin.in	2001/11/02 23:11:39	1.41
--- clogin.in	2001/11/15 05:47:53
***************
*** 489,498 ****
  						  exp_continue }
  		-re "\[\n\r]+"			{ send_user -- "$expect_out(buffer)"
  						  exp_continue }
! 		-re "\[^\r\n]*Press <SPACE> to cont\[^\r\n]*"	{ send " "
! 						  expect {
! 							-re "\[\r\n]*\r\r" {}
! 						  }
  						  exp_continue
  						}
  		-re "^<-+ More -+>\[^\n\r]*"	{ send " "
--- 489,496 ----
  						  exp_continue }
  		-re "\[\n\r]+"			{ send_user -- "$expect_out(buffer)"
  						  exp_continue }
! 		-re "\[^\r\n]*Press <SPACE> to cont\[^\r\n]*"	{
! 						  send " "
  						  exp_continue
  						}
  		-re "^<-+ More -+>\[^\n\r]*"	{ send " "

i feel for anyone burdened by these beasts.