branch: elpa/forth-mode
commit 9cf3d777ecf20e9465613c1fd0de0ccc98a0f278
Author: Lars Brinkhoff <[email protected]>
Commit: Lars Brinkhoff <[email protected]>
Fix for C-c C-s forth-see.
---
forth-interaction-mode.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/forth-interaction-mode.el b/forth-interaction-mode.el
index 88ed5a3aa7..69d33cafec 100644
--- a/forth-interaction-mode.el
+++ b/forth-interaction-mode.el
@@ -118,12 +118,13 @@
(forth-interaction-send "include " file))
;;;###autoload
-(defun forth-see-word (word)
+(defun forth-see (word)
(interactive (list (forth-word-at-point)))
(let ((buffer (get-buffer-create "*see*")))
(pop-to-buffer buffer)
- (erase-buffer)
- (insert (forth-interaction-send "see " word))
+ (let ((inhibit-read-only t))
+ (erase-buffer)
+ (insert (forth-interaction-send "see " word)))
(special-mode)))
(provide 'forth-interaction-mode)
