Refactor gpolonkai/goto-next-char for a bit more performance

configuration.org

@@ -608,10 +608,8 @@ line first.  Then jump to the actual end of the line."
 #+begin_src emacs-lisp
 (defun gpolonkai/goto-next-char (chr)
   (interactive "c")
-  (let ((substr (char-to-string chr))
-        (end (save-excursion (end-of-line) (point))))
-    (when (search-forward substr end t)
-      (backward-char))))
+  (when (search-forward (char-to-string chr) (pos-eol) t)
+    (backward-char)))
 #+end_src
 
 *** Move to the beginning of the next word