Subversion Repositories DevTools

Rev

Rev 5253 | Rev 5608 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5253 Rev 5272
Line 40... Line 40...
40 
        system("/usr/bin/logger", "-p", "local0.notice", "-t", $0,
 40 
        system("/usr/bin/logger", "-p", "local0.notice", "-t", $0,
41 
               sprintf("%s/%s: is empty", $DIR, $pkg, $rwx));
 41 
               sprintf("%s/%s: is empty", $DIR, $pkg, $rwx));
42 
        printf STDERR ("%s: %s/%s: is empty\n", $0, $DIR, $pkg, $rwx);
 42 
        printf STDERR ("%s: %s/%s: is empty\n", $0, $DIR, $pkg, $rwx);
43 
        unless (rmdir($pkg)) {
 43 
        unless (rmdir($pkg)) {
44 
            printf STDERR "%s: Could not delete empty directiry %s/%s: %s\n", $0, $rwx, $DIR, $pkg, $!;
 44 
            printf STDERR "%s: Could not delete empty directiry %s/%s: %s\n", $0, $rwx, $DIR, $pkg, $!;
45 
            next;
 - 
 
46 
        }
 45 
        }
- 
 
 46 
        next;
47 
    }
 47 
    }
48 
 
 48 
 
49 
    # Rather than change everything every day, change it only if it's wrong
 49 
    # Rather than change everything every day, change it only if it's wrong
50 
    if ($rwx != 00775) {
 50 
    if ($rwx != 00775) {
51 
        system("/usr/bin/logger", "-p", "local0.notice", "-t", $0,
 51 
        system("/usr/bin/logger", "-p", "local0.notice", "-t", $0,