"I am only an egg." [entries|archive|friends|userinfo]
Valery V. Vorotyntsev

[ userinfo | livejournal userinfo ]
[ archive | journal archive ]

Links
[Links:| *reader* delicious lastfm wishlist yubnub ]

`work-log-hide-inactive' via "d-a-i" sequences [Jul. 4th, 2009|02:16 am]
[Tags|, , , ]

It works!

[screenshot] work-log.el development

Sorry, but no explanations right now -- I'll better have some sleep...

Anyway, the picture is nice, isn't it? :)

* * *

Update: the description of above screenshot.

Link3 comments|Leave a comment

[jabber-el] ignore 12111 of ICQ [Jul. 3rd, 2008|12:55 am]
[Tags|, , , , ]

(defadvice jabber-process-subscription-request (around jabber-ignore-12111
                                                       (jc from presence-status)
                                                       activate)
  "Process an incoming subscription request, ignoring the 12111 ICQ user.

icq.com:
  As part of the process of upgrading ICQ users to our newest, most
  advanced version, ICQ6, we have added a new user name to your
  contact list ''ICQ System''. The newly added user is intended to
  improve ICQ's line of communication with our users and assure you
  continue to enjoy talking to everybody, everywhere.
jabber.el:
  Go subscribe yourself."
  (unless (string-match "^12111@icq\\." from) ad-do-it))
Link3 comments|Leave a comment

having fun with spam [Dec. 6th, 2007|05:54 pm]
[Tags|, , ]

Вы знаете, я теперь с нетерпением жду очередного бреда из корпоративной спам-рассылки.

Как только он приходит, викинги поют веселую песенку из оригинального монти пайтоновского скетча. Достигается добавлением в ~/.gnus.el следующих строчек:

(defun split-with-osd (split)
  (osd "Mail")
  split)

(defun split-with-vikings (split)
  (start-process "vikings" nil "play" "-q" "/home/vvv/downloads/spam-song.wav")
  split)

(setq nnmail-split-methods 'nnmail-split-fancy
      nnmail-split-fancy
      '(| (from "\\(recruitment\\|fooincbreak\\)@fooinc.com.ua"
                (: split-with-vikings "mail.spam"))
          (to "broadcast@fooinc.com.ua" (: split-with-vikings "mail.spam"))
          (from "servicedesk@fooinc.com.ua" (: split-with-osd "mail.sdesk"))
          (: split-with-osd "mail.misc")))

Ссылки:

Link2 comments|Leave a comment

navigation
[ viewing | most recent entries ]

Advertisement