FUEL: Adjust region to word boundaries if needed in fuel-refactor-extract-word.
parent
c30c9f0c03
commit
75b0f1e058
|
@ -24,6 +24,10 @@
|
|||
"Extracts current region as a separate word."
|
||||
(interactive "r")
|
||||
(let* ((word (read-string "New word name: "))
|
||||
(begin (save-excursion
|
||||
(goto-char begin) (fuel-syntax--beginning-of-symbol-pos)))
|
||||
(end (save-excursion
|
||||
(goto-char end) (fuel-syntax--end-of-symbol-pos)))
|
||||
(code (buffer-substring begin end))
|
||||
(code-str (fuel--region-to-string begin end))
|
||||
(stack-effect (or (fuel-stack--infer-effect code-str)
|
||||
|
|
Loading…
Reference in New Issue