scip/autoscratch
1
0
Fork 0
mirror of https://codeberg.org/scip/autoscratch.git synced 2025-12-17 12:30:58 +01:00
Code Issues Packages Projects Releases Wiki Activity

use eval only

Browse Source
This commit is contained in:
Thomas von Dein
2017-07-18 19:53:25 +02:00
parent 9e874e50a4
commit 345b8ed853
1 changed files with 1 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
autoscratch-mode.el
View File

@@ -194,9 +194,7 @@ to $mode-scratch."
(defun autoscratch--eval-trigger (form) (defun autoscratch--eval-trigger (form)
"If FORM is a function execute interactively, otherwise evaluate it. "If FORM is a function execute interactively, otherwise evaluate it.
Executes `autoscratch-trigger-hook' after evaluation." Executes `autoscratch-trigger-hook' after evaluation."
(if (autoscratch--function-p form) (eval form)
(call-interactively form)
(eval form))
(run-hooks 'autoscratch-post-trigger-hook) (run-hooks 'autoscratch-post-trigger-hook)
(message (format "autoscratch switched to %s" major-mode))) (message (format "autoscratch switched to %s" major-mode)))