Remove unused code from the rigel client
This commit is contained in:
父節點
e4249444f8
當前提交
ca50c4709a
|
@ -82,19 +82,8 @@
|
|||
(defun fg42/rigel/read (txt)
|
||||
"Send the given text to the Rigel server to read it out load"
|
||||
(interactive "sRead: ")
|
||||
;; (let ((status (process-status "rigel-client")))
|
||||
;; (message "[Rigel] Status: %s" status)
|
||||
;; (cond
|
||||
;; ((string= status "stop")
|
||||
;; (continue-process "rigel-client"))
|
||||
;; ((and (string= status "connect")
|
||||
;; (string= status "open")) nil)
|
||||
;; (t (fg42/rigel/-connect))))
|
||||
(fg42/rigel/-connect)
|
||||
(process-send-string fg42/rigel/client-process (fg42/rigel/-pack txt))
|
||||
;;(process-send-eof fg42/rigel/client-process)
|
||||
;; (stop-process fg42/rigel/client-process)
|
||||
)
|
||||
(process-send-string fg42/rigel/client-process (fg42/rigel/-pack txt)))
|
||||
|
||||
|
||||
(defun fg42/rigel/read-region (beg end)
|
||||
|
|
Loading…
Reference in New Issue