emacs で一行ずつスクロールしたい
http://www.cozmixng.org/~kou/emacs/dot_emacs から色々調達
;;; 色を付ける (global-font-lock-mode t) (setq font-lock-support-mode 'fast-lock-mode) (setq font-lock-maximum-decoration t) (setq fast-lock-cache-directories '("~/.emacs-flc" ".")) ;;; 対応する括弧を光らせる。 (show-paren-mode 1) ;;; 終了時にオートセーブファイルを消す (setq delete-auto-save-files t) ;;; カーソルの点滅を止める (blink-cursor-mode 0) ;;; カーソルの位置が何文字目かを表示する (column-number-mode t) ;;; カーソルの位置が何行目かを表示する (line-number-mode t) ;;; 最終更新日の自動挿入 ;;; ファイルの先頭から 8 行以内に Time-stamp: <> または ;;; Time-stamp: " " と書いてあれば、セーブ時に自動的に日付が挿入され\ る (require 'time-stamp) ;; 日本語で日付を入れたくないのでlocaleをCにする (defun time-stamp-with-locale-c () (let ((system-time-locale "C")) (time-stamp) nil)) (if (not (memq 'time-stamp-with-locale-c write-file-hooks)) (add-hook 'write-file-hooks 'time-stamp-with-locale-c)) (setq time-stamp-format "%3a %3b %02d %02H:%02M:%02S %Z %:y") ;;; 最近使ったファイルを保存(M-x recentf-open-filesで開く) (recentf-mode)