1 *** expect-5.39/fixline1.orig   Wed Oct  8 13:49:17 2003 
  2 --- expect-5.39/fixline1        Wed Oct  8 14:26:06 2003 
  3 ***************
  4 *** 20,25 ****
  5       regexp "^#!(.*/)*(.*)" $line1 X X tail
  6       set header "#!/bin/sh\n"
  7       append header "# \\\n"
  8 !     append header "exec $tail "; append header {"$0" ${1+"$@"}}
  9   }
 10   puts -nonewline "$header\n[read stdin]"
 11 --- 20,25 ----
 12       regexp "^#!(.*/)*(.*)" $line1 X X tail
 13       set header "#!/bin/sh\n"
 14       append header "# \\\n"
 15 !     append header "exec /opt/sfw/bin/$tail "; append header {"$0" ${1+"$@"}}
 16   }
 17   puts -nonewline "$header\n[read stdin]"

  1 *** expect-5.43/fixline1.orig   Wed Oct  8 13:49:17 2003 
  2 --- expect-5.43/fixline1        Wed Oct  8 14:26:06 2003 
  3 ***************
  4 *** 20,25 ****
  5       regexp "^#!(.*/)*(.*)" $line1 X X tail
  6       set header "#!/bin/sh\n"
  7       append header "# \\\n"
  8 !     append header "exec $tail "; append header {"$0" ${1+"$@"}}
  9   }
 10   puts -nonewline "$header\n[read stdin]"
 11 --- 20,25 ----
 12       regexp "^#!(.*/)*(.*)" $line1 X X tail
 13       set header "#!/bin/sh\n"
 14       append header "# \\\n"
 15 !     append header "exec /opt/sfw/bin/$tail "; append header {"$0" ${1+"$@"}}
 16   }
 17   puts -nonewline "$header\n[read stdin]"