Gajulog

＃ ウォン

韓国の通貨ウォンがヘッジファンドの標的になっていてアツイらしい。ここ。

＃ *scratch* を kill-buffer しない

kill-bufferしようとした場合は空にして底に沈める。 別名保存した場合は新しいのを作る。

;; *scratch*は消さないで
(add-hook 'kill-buffer-query-functions
          '(lambda ()
             (if (string= "*scratch*" (buffer-name))
                 (let ((scratch-buffer (get-buffer "*scratch*")))
                   (set-buffer scratch-buffer)
                   (funcall initial-major-mode)
                   (erase-buffer)
                   (bury-buffer scratch-buffer)
                   (switch-to-buffer nil)
                   nil)
               t)
             ))
(add-hook 'after-save-hook
          '(lambda ()
             (let ((scratch-buffer (get-buffer "*scratch*")))
               (unless scratch-buffer
                 (setq scratch-buffer (get-buffer-create "*scratch*"))
                 (set-buffer scratch-buffer)
                 (funcall initial-major-mode)
                 ))
             ))

＃ 東京大学物語　ヒット＆合格祈願イベント実施！

オフィシャルサイトの方も色々コンテンツが出来てきましたね。

で、2/25(土)の公開直前にイベントを実施、だそうです。 「遥ちゃんに励ましてほしい受験生諸君を募集」だそうです。 あはは、そんなのは遥か昔のことですわ^^;。

また、サイトの企画で恋と受験の悩み相談もやるようです。