--- todo-mode-1.34.el	Thu Jun 14 23:20:01 2001
+++ todo-mode-1.34-srb0.el	Tue Nov 13 15:02:27 2001
@@ -736,13 +738,21 @@
 (defun todo-edit-multiline ()
   "Set up a buffer for editing a multiline TODO list entry."
   (interactive)
-  (let ((buffer-name (generate-new-buffer-name todo-edit-buffer)))
-    (switch-to-buffer
-     (make-indirect-buffer
-      (file-name-nondirectory todo-file-do) buffer-name))
-    (message "To exit, simply kill this buffer and return to list.")
-    (todo-edit-mode)
-    (narrow-to-region (todo-item-start) (todo-item-end))))
+  (progn
+    ;; exit todo-edit-buffer with the cursor at the beginning of the
+    ;; edited item
+    (goto-char (todo-item-start))
+    (let ((buffer-name (generate-new-buffer-name todo-edit-buffer)))
+      (switch-to-buffer
+       (make-indirect-buffer
+	(file-name-nondirectory todo-file-do) buffer-name))
+      (message "To exit, simply kill this buffer and return to list.")
+      (todo-edit-mode)			; this seems to have no effect
+					; on todo-edit-multiline
+      (narrow-to-region (todo-item-start) (todo-item-end)))
+    ;; enter todo-edit-buffer with the cursor at the end of the
+    ;; item to be edited
+    (goto-char (point-max))))
 
 ;;;### autoload
 (defun todo-add-category (cat)