Auto commit by The Sugar System.

[sugar.git] / dot-files / _navi2ch / init

diff --git a/dot-files/_navi2ch/init b/dot-files/_navi2ch/init
index 625464372406d73eafe83ab0563c48387a1da0ce..77b349091295876e11ca5a1ce74ca79ac8b037dc 100644 (file)
--- a/dot-files/_navi2ch/init
+++ b/dot-files/_navi2ch/init
@@ -20,6 +20,13 @@
 (setq navi2ch-oyster-id "pho@cielonegro.org")
 (setq navi2ch-oyster-password "gestalt")
 
+;; Emacs23 mona fonts
+(add-hook 'navi2ch-mona-setup-hook
+          (lambda ()
+            (set-face-attribute 'navi2ch-mona12-face nil :fontset "fontset-default" :font "Mona 12")
+            (set-face-attribute 'navi2ch-mona14-face nil :fontset "fontset-default" :font "Mona 14")
+            (set-face-attribute 'navi2ch-mona16-face nil :fontset "fontset-default" :font "Mona 16")))
+
 ;; others
 (add-hook 'navi2ch-before-startup-hook
          (lambda ()
@@ -44,7 +51,9 @@
 
 (navi2ch-auto-modify
   (setq navi2ch-article-message-filter-by-name-alist
-       '(("雷鳥" . hide)
+       '(("◆.NHnubyYck" . hide)
+      ("◆3waIkAJWrg" . hide)
+      ("雷鳥" . hide)
       ("ミノワマソ" . hide)
       ("◆.EDMOUBKE2" . hide)
       ("改行太郎 ◆KAIGYOBBMM " . hide)
@@ -110,5 +119,8 @@
       (("\244\242\244\334\241\274\244\363" e)
        . hide)))
   (setq navi2ch-article-message-filter-by-mail-alist
-       '(("younho@hananet.net" . hide)
-      ("cat /etc/passwd | mail nobody@nonexistent.com" . hide))))
+       '(("baka" . hide)
+      ("younho@hananet.net" . hide)
+      ("cat /etc/passwd | mail nobody@nonexistent.com" . hide)))
+  (setq navi2ch-article-message-filter-by-id-alist
+        '(("cGBfr+pD" . hide))))