diff --git a/org-contacts.el b/org-contacts.el index 8172c80..534372f 100644 --- a/org-contacts.el +++ b/org-contacts.el @@ -151,7 +151,6 @@ This overrides `org-email-link-description-format' if set." ;; Decalre external functions and variables (declare-function org-reverse-string "org") -(declare-function org-install-letbind "org-exp") (declare-function diary-ordinal-suffix "ext:diary-lib") (declare-function wl-summary-message-number "ext:wl-summary") (declare-function wl-address-header-extract-address "ext:wl-address") @@ -871,20 +870,14 @@ is created and the VCard is written into that buffer." (buffer (if to-buffer (get-buffer-create to-buffer) (find-file-noselect filename)))) - (message "Exporting...") - (set-buffer buffer) (let ((inhibit-read-only t)) (erase-buffer)) (fundamental-mode) - (org-install-letbind) - (when (fboundp 'set-buffer-file-coding-system) (set-buffer-file-coding-system coding-system-for-write)) - (loop for contact in (org-contacts-filter name) do (insert (org-contacts-vcard-format contact))) - (if to-buffer (current-buffer) (progn (save-buffer) (kill-buffer)))))