emacs -Q -l cl-lib --eval " \
(with-temp-buffer \
  (save-excursion \
    (insert \"עִבְרִית\nעִבְרִית\")) \
  (call-interactively (function next-line)) \
  (with-temp-buffer \
    (save-excursion (insert \"English\nEnglish\")) \
    (call-interactively (function next-line)) \
    (cl-assert (zerop (current-column)))))"