From 02e88d79f130a9db9a0f81a8fedaf900e2016ae3 Mon Sep 17 00:00:00 2001
From: Thomas Roessler <roessler@does-not-exist.org>
Date: Sun, 5 Jan 2003 22:16:02 +0000
Subject: [PATCH] Error checking for the creation of the temporary directory;
 also, use file mode 0700.

---
 smime_keys.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/smime_keys.pl b/smime_keys.pl
index 87147184..a131e34e 100755
--- 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;
-- 
2.40.0