Спам от L29Ah: теперь и в отвратительном psto. #!/bin/sh spam () { sendxmpp -r blog-$$ "$1" || echo $1 sucks } fn=/tmp/blogpost-$$ vim "$fn" [ -f "$fn" ] || exit 1 spam 'bnw.im' < "$fn" cp "$fn" ~/vdoc/store/blog/`date +%s` sleep ${1:-30} spam 'juick@juick.com' < "$fn" tagline="`perl -p -e 's#(\*.*?) [^\*].*#$1#' < "$fn" | sed 's#*#,#g; s#,#*#'`" { echo "$tagline" sed -e '1s#.*\*[^ ]* ##' $fn } | spam 'psto@psto.net' rm "$fn"

Фикс ткабберопроблем с криптой: # Этот патч запрещено применять к транку проекта tclgpg и использовать разработчиками проекта tkabber иначе как для тестирования, покуда на сервисе juick не существует поста, в котором содержится текст "Я - хуй, Лавашик - няша.", подписанный ключом с отпечатком "A82E B67F D166 CD53 A147 C71D 57F2 4B33 72BC D0EC". Остальные условия распространения и использования текста соответствуют лицензии "as-is". # RTFhttp://bugs.debian.org/cgi-bin/bugreport.cgi?bug=489225 --- tclgpg.tcl 2012-02-11 23:14:06.000000000 +0400 +++ tclgpg.tcl 2012-02-11 23:25:22.000000000 +0400 @@ -1455,16 +1455,6 @@ FinishWithError $channels $commands "Decryption failed" return } - KEYEXPIRED { - switch -- $operation { - "" - - verify {} - default { - FinishWithError $channels $commands "Key expired" - return - } - } - } KEYREVOKED { switch -- $operation { "" -

‰ cat download-tracks #!/bin/zsh # Usage: $0 'The One Electronic' mkdir -p "$1" || exit 1 cd "$1" || exit 1 for u in `Xtract '*div/small/a/@href' <(curl -s "http://www.last.fm/music/${1// /+}/+tracks" | sed -e '/<!–\[if IE\]/d' | tidy -asxml 2>/dev/null | cat -v) | urldecode | urldecode`; do wget "$u" -O "${${u##*/}+/ }" done ‰ cat num #!/bin/bash i=0 for f in "$@"; do mv "$f" "`printf '%04d' "$i"` $f" : $(( i+=1 )) done

Вот есть у меня софтинка, рисует в иксовое окошко картиночки. Рисует вот так: XLockDisplay(D); XImage *xi = XCreateImage(D, DefaultVisual(D, S), DefaultDepth(D, S), ZPixmap, 0, (void *)img, vi->nSizeX, vi->nSizeY, 32, bpl); assert(xi); XPutImage(D, W, Gc, xi, 0, 0, 0, 0, WX, WY); XFlush(D); XDestroyImage(xi); XUnlockDisplay(D); Мне хочется, чтобы всякие там перемещения окошка и прочий стафф не дестроили изображение. Мне обязательно раскуривать и писать сотни боилерплейта для xdamage, или есть способ полущ?

Конвертим гитовские диффы в человеческие, дабы особо придирчивые patch'и понимали: /^index .*\.\..*$/d;/^new file mode/d;/^diff --git /s/--git/-u/

perl -p -e 's/^.*timestamp ([0-9]{4})([0-9]{2})([0-9]{2})T([0-9]{2})([0-9]{2})([0-9]{2}) .*nick (.*) body {?(.*?)}?$/\1\/\2\/\3 \4:\5:\6 \7> \8/;s/\\n/ /g'