; sample gnus-setup.el file
; もしこのままでいい時は ~/.emacs に
; (load "gnus-setup") と書いておけばいいい

(setq gnus-auto-select-first nil)       ;サブジェクトのみの表示
(setq gnus-signature-file nil)
(setq gnus-summary-line-format "%U%R%z%I%(%N%[%4L: %-20,20n%]%) %s\n")

(setq news-reply-mode-hook
      '(lambda ()
         (define-key news-reply-mode-map "\C-c\C-w" 'select-signature)
         ))

(setq gnus-subscribe-newsgroup-method
        (function gnus-subscribe-hierarchically))
(setq gnus-show-all-headers t)
; ---------------------------------------------------------
; 
; ---------------------------------------------------------
(setq message-syntax-checks
      '((long-lines . disabled)
        (control-chars . disabled)))
; ---------------------------------------------------------
; 共通に必要なこと。
; ---------------------------------------------------------
(setq gnus-select-method '(nntp "papageno.sps.mot.com" (nntp-port-number 119)))
(setq gnus-local-organization 
      "Market Development Operations, Nippon Motorola" )
(setq gnus-local-timezone "JST +900")
; ---------------------------------------------------------
;  *Group* Buffer の見え方
; ---------------------------------------------------------
(setq gnus-thread-hide-subject t)
(setq gnus-thread-hide-subtree t)
(setq gnus-thread-ignore-subject)

; 次の行が必要になることがあるかも知れない
; (defvar system-name ( ) "papageno.sps.mot.com")