Meadow

EmacsKeyBindが使えるWindows用のアプリケーション。

• めどうさん入門(Meadow 入門)

を参考にして。

前準備

環境変数の設定

set HOME=C:\home\hogehoge
set TZ=JST-9
set TMP=C:\tmp

インストール

• http://www.meadowy.org/meadow/dists/

上記URLよりMeadow 1.15用のsetup.exeをDL。ダブルクリックして身を任せる。インストール先は

C:\Meadow

基本設定

C:\Meadow にあるdot.emacs.jaを$HOMEにコピー。.emacsとリネーム。

C-hでBack Space

;; C-h を backspace として使う。
(keyboard-translate ?\C-h ?\C-?)
(global-set-key "\C-h" nil)

(load-library "term/keyswap")

でも可

フォント

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
;;; フォントの設定
;;;

;; フォントセットの作成
(create-fontset-from-request "private-fontset"
                             '((width . 8)
                               (height . 16)
                               (fixed . t)
                               (italic . nil))
                             '((family . "ＭＳ ゴシック")
                               (family . "Courier New")))

;; プロパティの設定
(change-fontset-from-request "private-fontset"
                             '((width . 8)
                               (height . 16)
                               (fixed . t)
                               (weight . 700) ; bold
                               (italic . nil))
                             '((family . "ＭＳ ゴシック")
                               (family . "Courier New"))
                             1)

(change-fontset-from-request "private-fontset"
                             '((width . 8)
                               (height . 16)
                               (fixed . t)
                               (weight . 400)
                               (italic . t)) ; italic
                             '((family . "ＭＳ 明朝")
                               (family . "Courier New"))
                             2)

(change-fontset-from-request "private-fontset"
                             '((width . 8)
                               (height . 16)
                               (fixed . t)
                               (weight . 700); bold
                               (italic . t)) ; italic
                             '((family . "ＭＳ 明朝")
                               (family . "Courier New"))
                             3)

;; フレームの初期パラメータで、
;; 使用するフォントセットと IME フォントを指定
(setq default-frame-alist
      (append (list
              '(font . "private-fontset") ; フォントセット
              '(ime-font . "private-fontset-japanese-jisx0208") ; IME フォント
               )
              default-frame-alist))

;;; ここまで

行頭に追加

これは矩形選択を使うんだなあ。Wikiにテキストをはりつけるときとか、この矩形選択を使うと便利かも。まあ、普通のエディタだったら、メニューから選べたりするわけですが。

• Meadow memo

• C-x r k : 切取．
• C-x r y : 貼り付け
• C-x r o : 指定した矩形領域だけスペースを確保する (open-rectangle)
• C-x r c : 指定した矩形領域を消去する．スペースは確保． (clear-rectangle)
• C-x r d : 指定した矩形領域を消去する．スペースも消す． (delete-rectangle)
• C-x r t : 指定した矩形領域を文字で置き変える (string-rectangle)

これも使える。

強制的にリージョンを(１文字)インデント

C-x TAB (indent-rigidly)

自動改行(auto-fill）

• http://kawacho.don.am/win/meadow/customize/dot-emacs-sample.html#auto-fill

C-x p が無い

.emacsに以下を追加。

(define-key ctl-x-map "p"
  #'(lambda (arg) (interactive "p") (other-window (- arg))))

TAB8は飛びすぎ！

;; indent
(setq-default indent-level 4)
;;タブ幅を 4 に設定
(setq-default tab-width 4)

インデントを前行と一緒にする

http://meadow-faq.sourceforge.net/meadow-faq-ja_4.html#SEC68

;;; オートインデント
(setq indent-line-function 'indent-relative-maybe)

効かないが。

指定行に飛びたい

;; M-g で指定行へ移動
(global-set-key "\M-g" 'goto-line)

選択範囲（リージョン）をハイライトしたい

 (transient-mark-mode 1)

対応する｛｝をハイライトしたい

(show-paren-mode 1)

（）を薄く。

http://www.namazu.org/~satoru/programming/permstr.html

ChangeLog?

;; ChangeLog 用の設定
(setq user-full-name "NAME")
(setq user-mail-address "mail@address")

ruby-1.6.8\misc\ruby-mode.el

をsite-lispに移動。.emacsに以下を追加

;;; Ruby-mode
(autoload 'ruby-mode "ruby-mode" "Mode for editing ruby source files")
(setq auto-mode-alist
(append '(("\\.rb$" . ruby-mode)) auto-mode-alist))
(setq interpreter-mode-alist (append '(("^#!.*ruby" . ruby-mode)) interpreter-mode-alist))

;; tab and indent
(add-hook 'ruby-mode-hook
      '(lambda ()
         (inf-ruby-keys)
	 (setq tab-width 3)))
(setq ruby-indent-level 3)

• 2003-12-10 (水) 14:25:58 名無しさん? : C-x ^