Emacsはエディタとしては最高のソフトだと思っているのですが、
なぜかあまり知られていない。よくつかうのはorg-modeです。
これはiCalへのエクスポートもできるし、HTMLにも
エクスポートできるしとにかく便利だと思います。
ハード的にも最近macbook proのメモリを増やして、すこぶる調子の良いmacbookに
なっています。
そこでEmacsの初期値も変更しておこうと少しだけいじりました。
;;色を設定
(custom-set-faces
'(default ((t
(:background "black" :foreground "lemonchiffon")
))))
'(cursor ((((class color)
(background dark))
(:background "#00AA00"))
(((class color)
(background light))
(:background "#999999"))
(t ())
))
;; 選択範囲の色を指定
(set-face-background 'region "SkyBlue")
(set-face-foreground 'region "black")
;; 起動時のウィンドウサイズ、色などを設定
(if (boundp 'window-system)
(setq default-frame-alist
(append (list
'(cursor-type . box) ; カーソルの形状
'(top . 7) ; ウィンドウの表示位置（Y座標）
'(left . 7) ; ウィンドウの表示位置（X座標）
'(width . 120) ; ウィンドウの幅（文字数）
'(height . 70) ; ウィンドウの高さ（文字数）
)
default-frame-alist)))
(setq initial-frame-alist default-frame-alist )
;; iCal の説明文
(setq org-icalendar-combined-description "OrgModeのスケジュール出力")
;; カレンダーに適切なタイムゾーンを設定する（google 用には nil が必要）
(setq org-icalendar-timezone "Asia/Tokyo")
;; DONE になった TODO は出力対象から除外する
(setq org-icalendar-include-todo t)
;; （通常は，<>--<> で区間付き予定をつくる．非改行入力で日付がNoteに入らない）
(setq org-icalendar-use-scheduled '(event-if-todo))
(setq org-agenda-default-appointment-duration 60)
;; DL 付きで終日予定にする：締め切り日（スタンプで時間を指定しないこと）
(setq org-icalendar-use-deadline '(event-if-todo))
;;(setq (global-set-key (kbd "C-c a") 'org-agenda))
(setq org-agenda-files
'("~/Documents/Diary/DiaryFile.org" "~/Documents/Diary/ical.org"
"~/Documents/Diary/Jgran.org" "~/Documents/Diary/JobDiary.org"))
;; モードラインに現在時刻を表示する
(display-time)
選択時の色と時間を変更しただけ。
ほかにやることがないとも言えるがこれだけでもなんだか仕事のやる気がでてくる。
なぜかあまり知られていない。よくつかうのはorg-modeです。
これはiCalへのエクスポートもできるし、HTMLにも
エクスポートできるしとにかく便利だと思います。
ハード的にも最近macbook proのメモリを増やして、すこぶる調子の良いmacbookに
なっています。
そこでEmacsの初期値も変更しておこうと少しだけいじりました。
;;色を設定
(custom-set-faces
'(default ((t
(:background "black" :foreground "lemonchiffon")
))))
'(cursor ((((class color)
(background dark))
(:background "#00AA00"))
(((class color)
(background light))
(:background "#999999"))
(t ())
))
;; 選択範囲の色を指定
(set-face-background 'region "SkyBlue")
(set-face-foreground 'region "black")
;; 起動時のウィンドウサイズ、色などを設定
(if (boundp 'window-system)
(setq default-frame-alist
(append (list
'(cursor-type . box) ; カーソルの形状
'(top . 7) ; ウィンドウの表示位置（Y座標）
'(left . 7) ; ウィンドウの表示位置（X座標）
'(width . 120) ; ウィンドウの幅（文字数）
'(height . 70) ; ウィンドウの高さ（文字数）
)
default-frame-alist)))
(setq initial-frame-alist default-frame-alist )
;; iCal の説明文
(setq org-icalendar-combined-description "OrgModeのスケジュール出力")
;; カレンダーに適切なタイムゾーンを設定する（google 用には nil が必要）
(setq org-icalendar-timezone "Asia/Tokyo")
;; DONE になった TODO は出力対象から除外する
(setq org-icalendar-include-todo t)
;; （通常は，<>--<> で区間付き予定をつくる．非改行入力で日付がNoteに入らない）
(setq org-icalendar-use-scheduled '(event-if-todo))
(setq org-agenda-default-appointment-duration 60)
;; DL 付きで終日予定にする：締め切り日（スタンプで時間を指定しないこと）
(setq org-icalendar-use-deadline '(event-if-todo))
;;(setq (global-set-key (kbd "C-c a") 'org-agenda))
(setq org-agenda-files
'("~/Documents/Diary/DiaryFile.org" "~/Documents/Diary/ical.org"
"~/Documents/Diary/Jgran.org" "~/Documents/Diary/JobDiary.org"))
;; モードラインに現在時刻を表示する
(display-time)
選択時の色と時間を変更しただけ。
ほかにやることがないとも言えるがこれだけでもなんだか仕事のやる気がでてくる。
