steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

FUEL: Highlight new word during fuel-refactor-extract-word.

db4
Jose A. Ortega Ruiz 2009-01-08 01:50:35 +01:00
parent 676ead93a5
commit 73dc586be1
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
misc/fuel/fuel-refactor.el
View File

@ -37,8 +37,11 @@
(open-line 1)
(let ((start (point)))
(insert ": " word " " stack-effect "\n" code " ;\n")
(indent-region start (point)))
(goto-char (mark))))
(indent-region start (point))
(move-overlay fuel-stack--overlay start (point))
(goto-char (mark))
(sit-for fuel-stack-highlight-period)
(delete-overlay fuel-stack--overlay))))
(provide 'fuel-refactor)