Advertisement
froleyks

spacemacs.org<2>

Apr 30th, 2019
195
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.02 KB | None | 0 0
  1. (evil-define-text-object rsb/textobj-inner-c-defun (count &optional beg end type)
  2. (save-excursion
  3. (mark-defun)
  4. (re-search-forward "{")
  5. (exchange-point-and-mark)
  6. (re-search-backward "}")
  7. (evil-range (region-beginning) (region-end) type :expanded t)))
  8.  
  9. (evil-define-text-object rsb/textobj-outer-c-defun
  10. (count &optional beg end type)
  11. :type line
  12. (save-excursion
  13. (mark-defun)
  14. (if (looking-at "[:space:]*$")
  15. (forward-line))
  16. (exchange-point-and-mark)
  17. (unless (save-excursion
  18. (forward-line)
  19. (looking-at "[:space:]*$"))
  20. (forward-line))
  21. (evil-range (region-beginning)
  22. (region-end)
  23. type
  24. :expanded t)))
  25.  
  26. (define-key evil-inner-text-objects-map "f"
  27. 'rsb/textobj-inner-c-defun)
  28. (define-key evil-outer-text-objects-map "f"
  29. 'rsb/textobj-outer-c-defun)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement