Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (evil-define-text-object rsb/textobj-inner-c-defun (count &optional beg end type)
- (save-excursion
- (mark-defun)
- (re-search-forward "{")
- (exchange-point-and-mark)
- (re-search-backward "}")
- (evil-range (region-beginning) (region-end) type :expanded t)))
- (evil-define-text-object rsb/textobj-outer-c-defun
- (count &optional beg end type)
- :type line
- (save-excursion
- (mark-defun)
- (if (looking-at "[:space:]*$")
- (forward-line))
- (exchange-point-and-mark)
- (unless (save-excursion
- (forward-line)
- (looking-at "[:space:]*$"))
- (forward-line))
- (evil-range (region-beginning)
- (region-end)
- type
- :expanded t)))
- (define-key evil-inner-text-objects-map "f"
- 'rsb/textobj-inner-c-defun)
- (define-key evil-outer-text-objects-map "f"
- 'rsb/textobj-outer-c-defun)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement