tags 453845 + patch
thanks

The patch below makes the tildes expansion more robust by anchoring it
to the beginning of the string followed by a /

Bye,

Joerg

--- /usr/bin/smime_keys 2007-11-03 23:37:03.000000000 +0100
+++ smime_keys  2008-01-10 09:43:32.000000000 +0100
@@ -55,6 +55,7 @@
 my $opensslbin = "/usr/bin/openssl";
 my @tempfiles = ();
 my @cert_tmp_file = ();
+my $homedir = $ENV{HOME} || (getpwuid($<))[7];
 
 my $tmpdir;
 my $private_keys_path = mutt_Q 'smime_keys';
@@ -225,6 +226,9 @@
 EOF
 #'
 
+    # tilde expand
+    $answer =~ s/^~\//$homedir\//;
+
     $answer =~ /\"(.*?)\"/ and return $1;
     
     $answer =~ /^Mutt (.*?) / and die<<EOF;

Attachment: signature.asc
Description: Digital signature

Reply via email to