Ticket #2029: urar.in.diff

File urar.in.diff, 704 bytes (added by storchaka, 14 years ago)
  • urar.in

    old new  
    3131     $UNRAR v -c- "$1" | @AWK@ -v uid=`id -u` -v gid=`id -g` ' 
    3232BEGIN { flag=0 } 
    3333/^-------/ { flag++; if (flag > 1) exit 0; next } 
    34 { 
    35 if (flag == 0) next 
    36 if ( !/ [0-9][0-9]:[0-9][0-9] /) str = $0  # there is no time spec in this line 
    37 else { 
    38     if (str ~ /^\^/) 
    39         str=substr(str, 2) 
     34flag==1 { 
     35    str = substr($0, 2) 
     36    getline 
    4037    split($4, a, "-") 
    4138    if (index($6, "D") != 0) 
    4239        $6="drwxr-xr-x" 
     
    4441        if (index($6, ".") != 0) 
    4542            $6="-rw-r--r--" 
    4643    printf "%s 1 %s %s %d %02d/%02d/%02d %s %s\n", $6, uid, gid, $1, a[2], a[1], a[3], $5, str 
    47 } 
    4844}' 
    4945} 
    5046