dot-files/_navi2ch/init

   1 ;; -*- emacs-lisp -*-
   2
   3 ;; general
   4 (add-to-list 'load-path (expand-file-name "~/.navi2ch/elisp"))
   5
   6 ;; sinsure
   7 (require 'sinsure)
   8
   9 ;; custom
  10 (require 'navi2ch-board-custom)
  11
  12 ;; idle-parse
  13 (require 'navi2ch-idle-parse)
  14
  15 ;; migemo
  16 (require 'navi2ch-migemo)
  17
  18 ;; oyster
  19 (setq navi2ch-oyster-use-oyster t)
  20 (setq navi2ch-oyster-id "pho@cielonegro.org")
  21 (setq navi2ch-oyster-password "gestalt")
  22
  23 ;; Emacs23 mona fonts
  24 (add-hook 'navi2ch-mona-setup-hook
  25           (lambda ()
  26             (set-face-attribute 'navi2ch-mona12-face nil :fontset "fontset-default" :font "Mona 12")
  27             (set-face-attribute 'navi2ch-mona14-face nil :fontset "fontset-default" :font "Mona 14")
  28             (set-face-attribute 'navi2ch-mona16-face nil :fontset "fontset-default" :font "Mona 16")))
  29
  30 ;; others
  31 (add-hook 'navi2ch-before-startup-hook
  32           (lambda ()
  33             (require 'navi2ch-head)))
  34
  35 (setq navi2ch-article-max-buffers 10)
  36 (setq navi2ch-article-auto-expunge t)
  37 (setq navi2ch-message-user-name nil)
  38 (setq navi2ch-mona-enable t)
  39 (setq navi2ch-board-hide-updated-article t)
  40 (setq navi2ch-board-insert-subject-with-diff t)
  41 (setq navi2ch-board-insert-subject-with-unread t)
  42 (setq navi2ch-bookmark-remember-order-after-sort t)
  43 (setq navi2ch-multibbs-send-message-retry-confirm-function #'always-t)
  44 (add-hook 'navi2ch-article-mode-hook
  45           (lambda ()
  46             (local-set-key "\C-xg" 'navi2ch-article-goto-number)))
  47
  48 ;; unifile
  49 ;(require 'navi2ch-unifile)
  50 ;(navi2ch-unifile-enable)
  51
  52 (navi2ch-auto-modify
  53   (setq navi2ch-article-message-filter-by-name-alist
  54         '(("◆.NHnubyYck" . hide)
  55       ("◆3waIkAJWrg" . hide)
  56       ("雷鳥" . hide)
  57       ("ミノワマソ" . hide)
  58       ("◆.EDMOUBKE2" . hide)
  59       ("改行太郎 ◆KAIGYOBBMM " . hide)
  60       ("アジアのこころ" . hide)
  61       ("◆6mIITGYBo. " . hide)
  62       ("地球市民" . hide)
  63       ("深緑の頃" . hide)
  64       ("ハルピン.*HADURI*" . hide)
  65       ("◆Z2KySTSpOo " . hide)
  66       ("Ren \242\241Z2KySTSpOo " . hide)
  67       ("Aho\245\326\245\351\245\363\245\263" . hide)
  68       ("\242\241sFgTo8IM/s" . hide)
  69       ("\245\267\245\345\241\274\245\353" . hide)
  70       ("\242\241QHUMtA89T." . hide)
  71       ("\216\274\216\255\216\260\216\331" . hide)
  72       ("\244\246\244\363\244\301\244\257\244\363" . hide)
  73       ("\260\360\302\364 \242\241lXXXNICUgM " . hide)
  74       ("\261\374\273\263\302\345\311\275" . hide)
  75       ("\242\241DVEmhO17sU " . hide)
  76       ("\262\326\262\320 \242\241osyGemHANA " . hide)
  77       ("\242\241OpB1XIu97E" . hide)
  78       ("wizardHSP/HSS \242\241OpB1XIu97E " . hide)
  79       ("wizard \242\241OpB1XIu97E " . hide)
  80       ("\314\276\314\265\244\267\241\367\302\364\302\274" . hide)
  81       ("HINA \242\241PhwWyNAAxY " . hide)
  82       ("\242\300^\216\252^\242\300 \242\241DOGGYyS6GA " . hide)
  83       ("\242\241hdVZrjZZF2" . hide)
  84       ("\244\242\244\244\245\277\245\363  \242\2413QC.t4i5w6" . hide)
  85       ("\312\335\241\241\241\241\241\241\241\241\241\241\301\264\241\241\241\241\241\241\241\241\241\241\244\310\241\241\241\241\241\241\241\241\241\241\244\363\241\241\241\241\241\241\241\241\241\241\244\263\241\241\241\241\241\241\241\241\241\241\244\304" . hide)
  86       ("\312\335\301\264\244\310\244\363\244\263\244\304" . hide)
  87       ("\275\302\303\253\266\350\314\261 \242\24145V9WSIBUY " . hide)
  88       (("\267\331\302\300" F)
  89        . hide)
  90       ("\245\324\245\355\245\263\243\261\243\261\272\315" . hide)
  91       (("^\245\250\245\337\241\274\245\353" R)
  92        . hide)
  93       ("\244\322\244\355\244\267\243\261\243\260\272\315" . hide)
  94       ("\244\335\244\263\244\313\244\343\244\363 \242\2418wwUsyplVU " . hide)
  95       ("\277\337\313\274 \242\241TDFFzP5Uj. " . hide)
  96       ("\245\333\245\342\241\367\245\265\245\324\245\250\245\363\245\271" . hide)
  97       ("\244\263\244\342\242\253" . hide)
  98       ("\277\245\305\304\244\265\244\363 \242\2418/MtyDeTiY " . hide)
  99       ("\244\342\244\263" . hide)
 100       ("LL COOL J\302\300\317\272" . hide)))
 101   (setq navi2ch-article-message-filter-by-message-alist
 102         '(("雷鳥" . hide)
 103       ("雷鳥一号" . hide)
 104       (("\245\244\245\244\245\244\245\243\245\243\245\244\245\243\245\344\245\303\245\333\245\252\245\252\245\252\245\245\245\303\245\245\245\246\245\246" s)
 105        . hide)
 106       ("\245\244\245\244\245\244\245\243\245\243\245\244\245\243\245\344\245\303\245\333\245\252\245\252\245\252\245\245\245\303\245\245\245\246\245\246\274\253\270\312\267\371\260\255\241\252\241\252" . hide)
 107       ("\241\374\277\306\305\270\241\326\300\272\277\300\274\300\264\265\241\327\244\307\244\252\307\272\244\337\244\316\263\247\315\315\244\330" . hide)
 108       ("AWT\244\317\277\300\241\252AWT\244\317\277\300\241\252AWT\244\317\277\300\241\252" . hide)
 109       ("http://d.hatena.ne.jp/khj/" . hide)
 110       ("\277\277\314\314\314\334\244\313\317\303\244\267\271\347\244\244\244\277\244\244\277\315\244\317\260\312\270\345\244\263\244\301\244\351\244\307\244\311\244\246\244\276\241\243" . hide)
 111       ("\244\275\244\352\244\343\244\244\244\244\262\303\270\272\245\310\245\352\245\303\245\327\244\342\310\275\314\300\244\271\244\353\244\357" . hide)
 112       ("COPD\244\313\244\312\244\353\244\350" . hide)
 113       ("COPD\244\313\244\312\244\353\244\350\241\243" . hide)
 114       (("\310\376\277\315\244\252\273\320\244\265\244\363\244\316\245\357\245\354\245\341\244\254\270\253\244\354\244\353\245\265\245\244\245\310\310\257\270\253\244\307\244\304\241\252" S)
 115        . hide)
 116       (("\244\263\244\263\244\316\245\265\245\244\245\310\241\242\245\250\245\303\245\301\244\271\244\256\244\307\244\304\244\350\241\304" S)
 117        . hide)
 118       ("\272\243\306\374\241\242\272\362\306\374\265\257\244\255\244\306\244\312\244\244\244\263\244\310\244\254\314\300\270\345\306\374\244\3136\306\374\270\345\244\310\244\312\244\352\244\252\273\320\244\301\244\343\244\363\244\254\244\252\267\273\244\301\244\343\244\363\244\316\275\320\315\350\273\366\244\313\310\335\304\352\244\265\244\354\244\306" . hide)
 119       (("\244\242\244\334\241\274\244\363" e)
 120        . hide)))
 121   (setq navi2ch-article-message-filter-by-mail-alist
 122         '(("baka" . hide)
 123       ("younho@hananet.net" . hide)
 124       ("cat /etc/passwd | mail nobody@nonexistent.com" . hide)))
 125   (setq navi2ch-article-message-filter-by-id-alist
 126         '(("cGBfr+pD" . hide))))