branch: elpa/forth-mode
commit f418b9aac21d3139144c36414864a25f795df352
Author: Lars Brinkhoff <[email protected]>
Commit: Lars Brinkhoff <[email protected]>
Set process coding system for SwiftForth.
---
backend/swiftforth.el | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/backend/swiftforth.el b/backend/swiftforth.el
index b681165b31..4a91c26a6c 100644
--- a/backend/swiftforth.el
+++ b/backend/swiftforth.el
@@ -1,5 +1,12 @@
(require 'forth-interaction-mode)
+(set-process-coding-system (get-buffer-process forth-interaction-buffer)
+ 'raw-text-dos 'raw-text-dos)
+(save-excursion
+ (with-current-buffer forth-interaction-buffer
+ (goto-char (point-max))
+ (insert "\n")))
+
(forth-interaction-send (concat "include " forth-backend-dir
"/swiftforth.fth"))
(provide 'swiftforth)
