Xyzzy設定 (1)

~/.xyzzy

;;-------------------------------------------------------
;; バックアップファイルを他のところに取る
;;-------------------------------------------------------
(require "backup")
(setq *backup-directory* "~/backup-xyzzy-files/")
(setq *hierarchic-backup-directory* t)

;;-------------------------------------------------------
;; 補完機能
;;-------------------------------------------------------
(global-set-key #\C-j 'dabbrev-expand)

;;-------------------------------------------------------
;; 現在時刻をカーソル位置に挿入
;;-------------------------------------------------------
(defun insert-date()
  (interactive)
  (insert (format-date-string "%Y-%m-%d %H:%M:%S (%a)"))
)
(global-set-key '(#\C-x #\t) 'insert-date)

Emacs設定 (1)

~/.emacs.d/init.el

;; 日本語の設定（UTF-8）
(set-language-environment 'Japanese)
(prefer-coding-system 'utf-8)

;; 警告音もフラッシュも全て無効
(setq ring-bell-function 'ignore)

;; 補完機能
(global-set-key "\C-j" 'dabbrev-expand)