Get the pull test to pass.

org-todotxt.el

@@ -60,7 +60,7 @@
 ;; Sync
 
 (defun org-todotxt-sync (todotxt-file)
-  "Pulls in any new tasks from TODOTXT-FILE into `org-todotxt-inbox-for-pull' and then pushes the result of `org-todotxt-create-agenda-function' into it.
+  "Pulls in any new tasks from TODOTXT-FILE into `org-todotxt-inbox-for-pull' and then overwrite it with the result of `org-todotxt-create-agenda-function'.
 
 New tasks are defined as any task without an org-id marker."
   (interactive)
@@ -160,12 +160,12 @@ Uses the Org tags associated with this task."
 
 (defun org-todotxt-pull (from-todotxt-file)
   (with-temp-buffer
-    (insert-file from-todotxt-file)
-    (goto-char 1))
+    (insert-file-contents-literally from-todotxt-file)
+    (goto-char 1)
     (while (not (eobp))
       (if (org-todotxt-pull--is-new-task-p)
           (org-todotxt-pull--new-task-from-line))
-      (forward-line)))
+      (forward-line))))
 
 ;; auto-push
 

test/org-todotxt-test.el

@@ -85,7 +85,7 @@
       (delete-file todotxt-file-test-pull-to-org-inbox))
   (let ((org-todotxt-inbox-for-pull todotxt-file-test-pull-to-org-inbox))
     (org-todotxt-pull todotxt-file-test-pull-from-todotxt)
-    (with-current-buffer (find-file-literally org-todotxt-inbox-for-pull)
+    (with-current-buffer (find-file-noselect org-todotxt-inbox-for-pull)
       (goto-char 1)
       (should (search-forward "* Brilliant todo PHB captures on mobile device" nil t))
       (kill-buffer))))