~ubuntu-branches/debian/sid/postfix/sid

« back to all changes in this revision

Viewing changes to auxiliary/qshape/qshape.pl

  • Committer: Package Import Robot
  • Author(s): LaMont Jones
  • Date: 2012-03-20 13:47:16 UTC
  • mfrom: (1.1.34) (39.1.16 trunk)
  • Revision ID: package-import@ubuntu.com-20120320134716-o62kosz3odzt1rh6
Tags: 2.9.1-2
Drop unnecessary openssl check, since sonames will save us.

Show diffs side-by-side

added added

removed removed

Lines of Context:
212
212
 
213
213
sub qenv {
214
214
    my ($qfile) = @_;
215
 
    return unless $qfile =~ m{(^|/)[A-F0-9]{6,}$};
 
215
    return unless $qfile =~ m{(^|/)[A-Za-z0-9]{6,}$};
216
216
    my @st = lstat($qfile);
217
217
    return unless (@st > 0 && -f _ && (($st[2] & 0733) == 0700));
218
218