Browse Source

org-mobile: Fix code typo

* lisp/org-mobile.el (org-mobile-create-index-file): Fix code typo.

Reported-by: Martin Leduc <ldcmrtn@gmail.com>
<http://permalink.gmane.org/gmane.emacs.orgmode/108193>
Nicolas Goaziou 8 years ago
parent
commit
41c0f509c6
1 changed files with 2 additions and 2 deletions
  1. 2 2
      lisp/org-mobile.el

+ 2 - 2
lisp/org-mobile.el

@@ -463,8 +463,8 @@ agenda view showing the flagged items."
       (when (file-exists-p (expand-file-name
 			    org-mobile-directory "agendas.org"))
 	(insert "* [[file:agendas.org][Agenda Views]]\n"))
-      (pcase-dolist (`(,file . ,link-name) files-alist)
-	(insert (format "* [[file:%s][%s]]\n" file link-name)))
+      (pcase-dolist (`(,_ . ,link-name) files-alist)
+	(insert (format "* [[file:%s][%s]]\n" link-name link-name)))
       (push (cons org-mobile-index-file (md5 (buffer-string)))
 	    org-mobile-checksum-files))
     (when org-mobile-use-encryption