Permalink
Browse files

encoding Shift_JIS to UTF-8

  • Loading branch information...
1 parent e2192a5 commit 7491bae1fe7db26bebefab8979037f44c6db4f1e @kosh04 committed Apr 19, 2009
Showing with 12 additions and 12 deletions.
  1. +12 −12 newlisp.el
View
@@ -2,22 +2,22 @@
;; This file is NOT part of GNU Emacs.
-;; Time-stamp: <2009-04-19T15:14:44>
+;; Time-stamp: <2009-04-19T16:46:25>
;; Usage:
;; (require 'newlisp)
;; (add-to-list 'auto-mode-alist '("\\.lsp$" . newlisp-mode))
;; Todo:
-;; - newlisp-eval-buffer を独立プロセスで
+;; - newlisp-eval-buffer を独立プロセスで
;; - newlisp-mode
-;; - 色付け (newlisp-mode.el, elisp-font-lock.el)
-;; - シンボル補完 -> etags, complete-symbol, dabbrev-expand
-;; - pop-to-buffer は縦分割を好む人もいるかも
-;; - elisp の書式チェック (checkdoc) -> 関数にはドキュメントを書けってさ
-;; - defcustomなど
-;; - 構文ステーブルを弄る (`|' はシンボル, `#' はコメント)
-;; - 全ては気の赴くままに
+;; - 色付け (newlisp-mode.el, elisp-font-lock.el)
+;; - シンボル補完 -> etags, complete-symbol, dabbrev-expand
+;; - pop-to-buffer は縦分割を好む人もいるかも
+;; - elisp の書式チェック (checkdoc) -> 関数にはドキュメントを書けってさ
+;; - defcustomなど
+;; - 構文ステーブルを弄る (`|' はシンボル, `#' はコメント)
+;; - 全ては気の赴くままに
;;; Code:
(eval-when-compile (require 'cl))
@@ -33,8 +33,8 @@
(let ((default-process-coding-system *newlisp-process-coding-system*))
(get-buffer-process
(make-comint "newlisp" *newlisp-command* nil
- ;; newlisp側では`~/'をホームディレクトリとして認識しないので
- ;; emacs側で展開しておく
+ ;; newlisp側では`~/'をホームディレクトリとして認識しないので
+ ;; emacs側で展開しておく
"-C" "-w" (expand-file-name default-directory)))))
(defun newlisp-show-repl (&optional no-focus)
@@ -170,7 +170,7 @@
(setq major-mode 'newlisp-mode
mode-name "newLISP")
(lisp-mode-variables 'and-use-lisp-syntax)
- ;; `#'もコメント扱いにしたい
+ ;; `#'もコメント扱いにしたい
;; (set (make-local-variable 'font-lock-keywords-case-fold-search) nil)
(run-mode-hooks 'newlisp-mode-hook))

0 comments on commit 7491bae

Please sign in to comment.