diff options
| author | John Mastro <john.b.mastro@gmail.com> | 2019-04-10 16:36:26 -0400 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2019-04-10 16:36:26 -0400 |
| commit | 109a1bc10bd0c4b47679a6ca5c4cd27c7c8d4ccb (patch) | |
| tree | 1d7217bb9b60e3c0a33142154b67d53575e0362d | |
| parent | b3512c3252e21e89f38487d96fc9bd259cf756bf (diff) | |
| parent | cab965113db016620692107beb1d0cf20ca695bc (diff) | |
| download | trident-mode.el-109a1bc10bd0c4b47679a6ca5c4cd27c7c8d4ccb.tar.gz trident-mode.el-109a1bc10bd0c4b47679a6ca5c4cd27c7c8d4ccb.tar.bz2 trident-mode.el-109a1bc10bd0c4b47679a6ca5c4cd27c7c8d4ccb.zip | |
Merge pull request #4 from synchromesh/trident-eval-buffer/slime-remove-edits
Added slime-remove-edits to trident-eval-buffer.
| -rw-r--r-- | trident-mode.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/trident-mode.el b/trident-mode.el index 82c52af..ff915f8 100644 --- a/trident-mode.el +++ b/trident-mode.el @@ -385,7 +385,10 @@ the current buffer." (defun trident-eval-buffer () "Evaluate the current buffer as Parenscript." (interactive) - (trident-eval-region (point-min) (point-max))) + (prog1 + (trident-eval-region (point-min) (point-max)) + (when slime-highlight-edits-mode + (slime-remove-edits (point-min) (point-max))))) (defun trident-eval-dwim () "Evaluate the active region or toplevel form. |