proglog

主にプログラミングに関する断片的メモ

hatena-mode.el

なんだか、いきなりpostが出来なくなった。
"posted"というメッセージは出るものの、実際にはpostできていない。


cygwin1.7.7、"Meadow-3.02-dev (RINDOU) (Rev.4261)"
hatena-mode hatena-mode のパッチ - 主題のない日記のパッチを当てて使ってきた。


前回の記事との間は、2〜3日。
その間に、何をしたか。
正直、思い当たる節が多過ぎて、なんともかんとも。


SSL周りのことでcygwinをverupした記事は反映されてるから、それは関係ないか。


やってみた対策。

  1. curlを自分のcygwin環境でコンパイル
  2. curlwindows版にしてみた。
  3. 以下の感じまで絞った.emacsでやってみた。
(set-language-environment "Japanese")

(require 'cygwin-mount)
(cygwin-mount-activate)
(require 'gnuserv)
(gnuserv-start)
(setq gnuserv-frame (selected-frame)) ; 新しいフレームを開かない
(setq exec-path (append (list "." "c:/cygwin/bin" "C:/cygwin/usr/local/bin")))

(mw32-ime-initialize)
(setq default-input-method "MW32-IME")
(setq-default mw32-ime-mode-line-state-indicator "[--]")
(setq mw32-ime-mode-line-state-indicator-list '("[--]" "[あ]" "[--]"))
(add-hook 'mw32-ime-on-hook
	  (function (lambda () (set-cursor-height 2))))
(add-hook 'mw32-ime-off-hook
	  (function (lambda () (set-cursor-height 4))))

(setq explicit-shell-file-name "bash.exe")
(setq shell-file-name "sh.exe")
(setq shell-command-switch "-c")

(setq exec-suffix-list '(".exe" ".sh" ".pl" ".rb" ".scm"))
(setq shell-file-name-chars "~/A-Za-z0-9_^$!#%&{}@`'.:()-")

(add-hook 'shell-mode-hook
 (lambda ()
  (set-buffer-process-coding-system 'sjis-unix 'sjis-unix )))

(setq exec-path (append (list "." "c:/cygwin/bin" "C:/cygwin/usr/local/bin")))

(autoload 'hatena "hatena-mode" "hatena diary mode" t)
(setq hatena-usrid "serian")
(setq hatena-plugin-directory "c:/Meadow/site-lisp/hatena-mode")
(setq hatena-entry-type 0)

(setenv "CYGWIN" "nodosfilewarning")
  1. NTemacsで試してみた。


.hatena\hatena-temp2.datを見るとsession idなども入っており、データはちゃんと作られているっぽい。


クッキーのほうはよく分からない。
curlは二つ取得して、その二つを送っている感じ。
ブラウザはそれより三つ多くて五つ。
なんで違うんだろう?