| 
					
				 | 
			
			
				@@ -873,7 +873,8 @@ to do our best." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (bday (org-contacts-vcard-escape (cdr (assoc-string org-contacts-birthday-property properties)))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (addr (cdr (assoc-string org-contacts-address-property properties))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (nick (org-contacts-vcard-escape (cdr (assoc-string org-contacts-nickname-property properties)))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	 (head (format "BEGIN:VCARD\nVERSION:3.0\nN:%s\nFN:%s\n" n name))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	 (head (format "BEGIN:VCARD\nVERSION:3.0\nN:%s\nFN:%s\n" n name)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	 emails-list result phones-list) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (concat head 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	    (when email (progn 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 			  (setq emails-list (org-contacts-split-property email)) 
			 |