Skip to content

Instantly share code, notes, and snippets.

@maximvl

maximvl/gist:ef9bba90cd4e3def143705ee6176b696

Created December 5, 2017 15:44
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save maximvl/ef9bba90cd4e3def143705ee6176b696 to your computer and use it in GitHub Desktop.
Save maximvl/ef9bba90cd4e3def143705ee6176b696 to your computer and use it in GitHub Desktop.
Download ZIP
elisp stuff
Raw
gistfile1.el
(cl-defun perl-move-cursor (pos &optional buffer)
(let ((window (get-buffer-window buffer t)))
(message "window: %s / pos: %s" window pos)
(if window
(progn
(goto-char pos)
(set-window-point window pos)
(message "char at %s" (point))
(message "char2 at %s" (window-point window)))
(goto-char pos))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment