/[anubis]/anubis/testsuite/lib/anubis.exp
ViewVC logotype

Diff of /anubis/testsuite/lib/anubis.exp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by gray, Tue Feb 11 17:01:00 2003 UTC revision 1.2 by gray, Mon Feb 17 20:55:21 2003 UTC
# Line 682  proc anubis_pat {patname} { Line 682  proc anubis_pat {patname} {
682                                  anubis_expect {-re "$expect\[^\n\]*\n"}                                  anubis_expect {-re "$expect\[^\n\]*\n"}
683                              } elseif [regexp "^:ADD (.*)" $line dummy expect] {                              } elseif [regexp "^:ADD (.*)" $line dummy expect] {
684                                  lappend file_pattern $expect                                  lappend file_pattern $expect
685                                } elseif [regexp "^:DEL (.*)" $line dummy expect] {
686                                    verbose "DEL:: $expect"
687                                    anubis_command "$expect"
688                              } else {                              } else {
689                                  anubis_command "$line"                                  anubis_command "$line"
690                                  lappend file_pattern $line                                  lappend file_pattern $line
# Line 713  proc anubis_pat {patname} { Line 716  proc anubis_pat {patname} {
716      }      }
717  }  }
718    
 # End of anubis.exp  
719    # End of anubis.exp

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26