浏览代码

contrib/lisp/org-contacts.el (org-contacts-vcard-format): Silence byte-compiler

* contrib/lisp/org-contacts.el (org-contacts-vcard-format): Silence byte-compiler.
Grégoire Jadi 12 年之前
父节点
当前提交
d9d9226c92
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      contrib/lisp/org-contacts.el

+ 2 - 1
contrib/lisp/org-contacts.el

@@ -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))