Changes between Initial Version and Version 1 of Ticket #2735, comment 1
- Timestamp:
- 07/21/17 18:15:44 (6 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
Ticket #2735, comment 1
initial v1 4 4 5 5 and put the following line 6 6 {{{ 7 7 if ($perms eq '?rwsrwsrwt') {$perms = 'drwxr-xr-x'}; 8 8 }}} 9 9 right after: 10 10 {{{ 11 11 sub print_file { 12 12 my ($perms,$zipver,$platform,$realsize,$format,$cmpsize,$comp,$year,$mon,$day,$hours,$mins,$secs,$filename) = @_; 13 13 }}}