# # patch "contrib/monotone.el" # from [687aabd71400ae8200b017b7797f6e21db1d4068] # to [a5608bb52ed1144fe1113d6556bfdd6887145ea2] # --- contrib/monotone.el +++ contrib/monotone.el @@ -235,7 +235,8 @@ (beginning-of-line) (when (looking-at "^enter passphrase for key ID \\(.*\\)") (let ((pass (monotone-read-passwd (match-string 1)))) - (insert "********\n") ;; + (end-of-line) + (insert "********\n") ;; filler text (process-send-string p (concat pass "\n"))))) (setq mt-status (process-exit-status p))) ;; make the buffer nice.