Advertisement
Guest User

Untitled

a guest
May 29th, 2015
220
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.56 KB | None | 0 0
  1. (defun link/subl-file ()
  2. "Edit current file in subl."
  3. (interactive)
  4. (shell-command (format "subl -n %s:%s"
  5. (buffer-file-name)
  6. (line-number-at-pos))))
  7. (evil-define-operator link/subl-line (beg end type)
  8. "Edit current region in subl."
  9. :motion evil-line
  10. (interactive "<R>")
  11. (shell-command-on-region beg end "subl -n -" t t))
  12. (evil-define-operator link/lyxit-line (beg end type)
  13. "Edit current region in lyx."
  14. :motion evil-line
  15. (interactive "<R>")
  16. (shell-command-on-region beg end "lyxit -n -" t t)
  17. (when org-indent-mode
  18. (org-indent-mode 1)))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement