takano32です．
参考になるか，わかりませんが，
私は以下のようにしてhideやmakerss_updateが
切り替えられるようにしています．
# 記述の位置(自分の変更点がわかりやすいように末尾に書いている)と
# 記述の方法がデタラメ(あまりelispに詳しくない)なので，添削希望です．
*** tdiary-mode.el 2005/09/08 13:35:50 1.1
--- tdiary-mode.el 2005/09/08 14:21:38
*** 347,352 ****
--- 347,359 ----
(add-to-list 'post-data (cons "year" year))
(add-to-list 'post-data (cons "month" month))
(add-to-list 'post-data (cons "day" day))
+ (if tdiary-post-hide
+ (add-to-list 'post-data (cons "hide" "true"))
+ )
+ (if tdiary-make-rss
+ (add-to-list 'post-data (cons "makerss_update" "true"))
+ )
+
(if tdiary-csrf-key (add-to-list 'post-data (cons
"csrf_protection_key" tdiary-csrf-key)))
(or (equal mode "edit")
(add-to-list 'post-data
***************
*** 578,580 ****
--- 585,625 ----
(provide 'tdiary-mode)
;;; tdiary-mode.el ends here
+
+
+ (defvar tdiary-post-hide t
+ "post hide if true.")
+
+ (defvar tdiary-make-rss t
+ "make rss if true.")
+
+ (defun toggle-tdiary-post-hide (&optional arg)
+ "toggle 'tdiary-post-hide'."
+ (interactive "P")
+ (if arg
+ (setq tdiary-post-hide t)
+ (if tdiary-post-hide
+ (setq tdiary-post-hide nil)
+ (setq tdiary-post-hide t))
+ )
+ (if tdiary-post-hide
+ (message "tdiary-post-hide true")
+
+ (defvar tdiary-make-rss t
+ "make rss if true.")
+
+ (defun toggle-tdiary-post-hide (&optional arg)
+ "toggle 'tdiary-post-hide'."
+ (interactive "P")
+ (if arg
+ (setq tdiary-post-hide t)
+ (if tdiary-post-hide
+ (setq tdiary-post-hide nil)
+ (setq tdiary-post-hide t))
+ )
+ (if tdiary-post-hide
+ (message "tdiary-post-hide true")
+ (message "tdiary-post-hide nil"))
+ )
+
+
+
+ (defun toggle-tdiary-make-rss (&optional arg)
+ "toggle 'tdiary-make-rss'."
+ (interactive "P")
+ (if arg
+ (setq tdiary-make-rss t)
+ (if tdiary-make-rss
+ (setq tdiary-make-rss nil)
+ (setq tdiary-make-rss t))
+ )
+ (if tdiary-make-rss
+ (message "tdiary-make-rss true")
+ (message "tdiary-make-rss nil"))
+ )
+
ついでに.emacsなどに以下のような設定をしています．
(add-hook 'tdiary-mode-hook
'(lambda()
(define-key tdiary-mode-map "\C-ch" 'toggle-tdiary-post-hide)
(define-key tdiary-mode-map "\C-cr" 'toggle-tdiary-make-rss)
)
)
C-c hで隠して投稿のオプションを切り替え，
C-c rでRSSの作成を切り替えができます．
> 他の更新 tool のことも考えると、
> parameter を渡した時だけ「RSSを更新しない」ようにして
> 従来通り parameter がない場合には RSS を更新する方が良いかもしれまん。
> # でも option の表記は「RSSを更新しない」よりも「RSSを更新する」
> にしたい気も。
これは私も同意です．
On 2005/09/08 13:44, YAA wrote:
> YAAです。
>
> At Mon, 05 Sep 2005 16:59:12 +0900,
> SHIBATA Hiroshi wrote:
>
>
>>makerss.rbを改造して日記を更新する時にRSSを更新するかどうかの選択オプシ
>>ョンを編集画面に追加してみました。以下のような感じになります。
>
>
> 最近欲しいと感じていた機能です。ありがとうございます。
>
> しかしこの変更によって、tdiary-mode を使って更新すると
> RSS が更新されなくなってしまいました。
>
> とりあえず以下のように parameter を渡すようにすれば、
> 更新されるようになりました。
>
> --- tdiary-mode.el.orig 2005-09-08 13:04:58.000000000 +0900
> +++ tdiary-mode.el 2005-09-08 13:22:23.000000000 +0900
> @@ -349,6 +349,7 @@
> (add-to-list 'post-data (cons "year" year))
> (add-to-list 'post-data (cons "month" month))
> (add-to-list 'post-data (cons "day" day))
> + (add-to-list 'post-data (cons "makerss_update" "true"))
> (if tdiary-csrf-key (add-to-list 'post-data (cons "csrf_protection_key" tdiary-csrf-key)))
> (or (equal mode "edit")
> (add-to-list 'post-data
>
>
> 他の更新 tool のことも考えると、
> parameter を渡した時だけ「RSSを更新しない」ようにして
> 従来通り parameter がない場合には RSS を更新する方が良いかもしれません。
> # でも option の表記は「RSSを更新しない」よりも「RSSを更新する」にしたい気も。
>
--
高野 光弘 (たかの みつひろ) <tak@...>
|