Bug#862702: patch

[David A Thompson]

This should might serve as a starting point for addressing the issue.

--- /usr/bin/2vcard     2015-12-13 03:10:38.000000000 -0800
+++ /home/thomp/computing/mail-email/clients/mutt/2vcard/2vcard-0.6/src/2vcard  
2017-05-15 11:54:52.000000000 -0700
@@ -369,8 +369,39 @@
 
                        endVcard();
 
+               } elsif (m/^alias\s+(.*)\s+(.*@.*)/) {
+                   # alias nick email@address
+                   print STDERR "Now we're getting somewhere...:\n";
+
+                   # take a stab at what might be a reasonable name... maybe 
warn that we don't have anything reliable for a name?
+                   my @name = ($1);
+                   my $x;
+                   
+                   beginVcard($1);
+                   
+                   foreach $x (reverse @name) {
+                       print WRITE "$x;";
+                   }
+                   print WRITE "\n";
+                   
+                   $x = $2;
+                   if ($x =~ m/(.*,.*)/) {
+                       my @emails = split /,/, $2;
+                       foreach $x (@emails) {
+                           $x =~ s/[<>]//g;
+                           writeEmail($x);
+                       }
+                   } else {
+                       $x =~ s/[<>]//g;
+                       writeEmail($x);
+                   }
+                   
+                   endVcard();
+
+
+                   
                } else {
-                       warnFormat($_);
+                   warnFormat($_);
                }
        }
 }