(defun kanji-filter (process output)
(insert-string output)
)
(defun kanji-start ()
(setq process-name "kanji-process")
(setq process (start-process process-name "kanji-buffer" "kanji.exe"))
(set-process-filter process 'kanji-filter)
(process-send-string process-name "marks")
)
Inscription à :
Publier les commentaires (Atom)
Aucun commentaire:
Enregistrer un commentaire