diff options
Diffstat (limited to 'test/lisp/erc/erc-tests.el')
| -rw-r--r-- | test/lisp/erc/erc-tests.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/test/lisp/erc/erc-tests.el b/test/lisp/erc/erc-tests.el index 0f222edacfa..55efe2fd2d9 100644 --- a/test/lisp/erc/erc-tests.el +++ b/test/lisp/erc/erc-tests.el @@ -522,7 +522,7 @@ (erc-send-current-line) (should (ring-p erc-input-ring)) (should (zerop (ring-member erc-input-ring "/one"))) ; equal - (should (save-excursion (forward-line -1) (goto-char (point-at-bol)) + (should (save-excursion (forward-line -1) (goto-char (pos-bol)) (looking-at-p "[*]+ echo: one"))) (should-not erc-input-ring-index) (erc-bol) @@ -575,15 +575,15 @@ (goto-char (point-min)) (search-forward "Version") (search-forward "\r\n\r\n") - (search-forward "myproxy.localhost:6667 >> PASS" (line-end-position)) + (search-forward "myproxy.localhost:6667 >> PASS" (pos-eol)) (forward-line) - (search-forward "irc.gnu.org << :irc.gnu.org 001" (line-end-position)) + (search-forward "irc.gnu.org << :irc.gnu.org 001" (pos-eol)) (forward-line) - (search-forward "irc.gnu.org << :irc.gnu.org 002" (line-end-position)) + (search-forward "irc.gnu.org << :irc.gnu.org 002" (pos-eol)) (forward-line) - (search-forward "FooNet << :irc.gnu.org 422" (line-end-position)) + (search-forward "FooNet << :irc.gnu.org 422" (pos-eol)) (forward-line) - (search-forward "BarNet << :irc.gnu.org 221" (line-end-position))) + (search-forward "BarNet << :irc.gnu.org 221" (pos-eol))) (when noninteractive (kill-buffer "*erc-protocol*") (should-not erc-debug-irc-protocol))) |