Error checking for the creation of the temporary directory; also,

use file mode 0700.

diff --git a/smime_keys.pl b/smime_keys.pl
index 87147184f7aa29a55156d6f90e6a44a09cd909fd..a131e34e72f786f1d83365ab73a58c968fce48a9 100755 (executable)
--- a/smime_keys.pl
+++ b/smime_keys.pl
@@ -956,7 +956,7 @@ sub newfile ($;$$) {
        if (! $tmpdir and $option eq "temp") {
                $tmpdir = mutt_Q 'tmpdir';
                $tmpdir = newfile("$tmpdir/smime");
-               mkdir $tmpdir;
+               mkdir $tmpdir, 0700 || die "Can't create $tmpdir: $!\n";
        }
        $filename = "$tmpdir/$filename" if ($option eq "temp");
        my $newfilename = $filename;