My 拉麺

After three and so years I'm deleting contents of my last.fm account. It's not that I suddenly realised, that I am willingly submitting informations about myself tu the public. Just it wasn't so crucial. There was a main change in last.fm background few years ago, when a young and original project become part of music industry giant. At first, It was quite original, connecting people by their listening habits. Because music is something you can talk about with everybody. Almost like a weather or last election, even if you are not forecaster.

But right now, things are changing. Orwell wasn't so right about many things. We are living in unfinished 1984 world. But its not institutions that need tu lurk informations about us. We are sending them everything they need to create complete picture. So there is no inner party that forces you to have cctv in home. You will get one by yourself and mount it over your head to feed your video podcasting blog ... I will still use last.fm for submitting events. After this years I hit 82294 milestone, and here are overall stats.

1		Witch Hunt			2,695
2		To What End?			2,546
3		F-Minus			1,762
4		This Bike Is a Pipe Bomb			1,604
5		R.A.M.B.O.			1,420
6		Keny Arkana			1,350
7		Fucked Up			1,333
8		I Object			1,127
9		Chumbawamba			1,060
10		Remains of the Day			1,053
11		Discarga			966
12		Kamikatze			933
13		1905			917
14		Madame Germen			881
15		Nödslakt			880

Why is OpenMoko so debianich ... why. Stripping out so important part of perl, as strict pragmatic module. And so pythonish, that SHR doesn't even ship with perl.

root@brick ~ $ perl rotate.pl 
-sh: perl: not found
root@brick ~ $ opkg-cl install perl
Installing perl (5.8.8-r26) to root...
Downloading http://build.shr-project.org/shr-unstable/ipk//armv4t/perl_5.8.8-r26_armv4t.ipk
Installing libperl5 (5.8.8-r26) to root...
Downloading http://build.shr-project.org/shr-unstable/ipk//armv4t/libperl5_5.8.8-r26_armv4t.ipk
Configuring libperl5
Configuring perl
root@brick ~ $ perl rotate.pl 
Can't locate strict.pm in @INC (@INC contains: /etc/perl /usr/local/lib/perl/5.8.8 /usr/local/share/perl/5.8.8 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.8 /usr/share/perl/5.8 /usr/local/lib/site_perl   .) at rotate.pl line 3.
BEGIN failed--compilation aborted at rotate.pl line 3.
root@brick ~ $ opkg-cl install perl-module-strict
Installing perl-module-strict (5.8.8-r26) to root...
Downloading http://build.shr-project.org/shr-unstable/ipk//armv4t/perl-module-strict_5.8.8-r26_armv4t.ipk
Configuring perl-module-strict

Workroud for that "warning:you are using superuser account!". Upstream decided not to supply switch to disable that thing, because you "should not" (sure!) run browser as root "because that's linux way". Yeah, great, but adding unnecessary (de)functionality is not the linux way either. And it's not really adding any security. Warn user, go away.

$ adduser midori

Now edit /usr/share/applications/midori.desktop and change Exec key to:

su - midori -c "/usr/bin/midori %u"

fs#254
fs#196

Googled and found nothing, except people asking for this. Place that script-fu chunk of code in your ~/.gimp*/scripts/batch-awb.scm and execude gimp -i -b '(batch-awb "*.JPG")' -b '(gimp-quit 0)'. 

(define (batch-awb pattern)
        (let* ((filelist (cadr (file-glob pattern 1))))
                (while (not (null? filelist))
                        (let* ((filename (car filelist))
                                (image (car (gimp-file-load RUN-NONINTERACTIVE filename filename)))
                                (drawable (car (gimp-image-get-active-layer image))))
                                (plug-in-c-astretch RUN-NONINTERACTIVE image drawable)
                                ;(set! drawable (car (gimp-image-get-active-layer image)))
                                (gimp-file-save RUN-NONINTERACTIVE image drawable filename filename)
                                (gimp-image-delete image))
                        (set! filelist (cdr filelist)))))

Based on http://www.gimp.org/tutorials/Basic_Batch/