File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed
Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change 7777 (with-current-buffer messages-buffer-name
7878 (save-excursion
7979 (forward-line -1 )
80- (buffer-substring (point ) (pos-eol )))))
80+ (buffer-substring (point ) (line-end-position )))))
8181
8282(defmacro merlin-cap--with-test-buffer (&rest body )
8383 " Run BODY with a temp buffer set up for Merlin completion."
@@ -111,14 +111,14 @@ completion, and MESSAGE is the message printed."
111111 (message " \n " )
112112 (message " [no message] " )
113113 (completion-at-point )
114- (let ((end (pos-eol ))
114+ (let ((end (line-end-position ))
115115 ; ; Just so the ERT error renders more nicely
116116 (point (point )))
117117 (should (equal (list (buffer-substring start point)
118118 (buffer-substring point end)
119119 (merlin-cap--current-message))
120120 (list new-prefix new-suffix message))))
121- (delete-region start (pos-eol ))))
121+ (delete-region start (line-end-position ))))
122122
123123(ert-deftest test-merlin-cap-completion ()
124124 (with-temp-buffer
You can’t perform that action at this time.
0 commit comments