Skip to content

Instantly share code, notes, and snippets.

View avar's full-sized avatar

Ævar Arnfjörð Bjarmason avar

View GitHub Profile
### Some commands for git.anyonecanedit.org:
# pushmi mirror:
$ crontab -l
# m h dom mon dow command
*/30 * * * * pushmi sync /home/git-svn-mirror/pushmi-svn-mirror/
# Dump SVN:
svnadmin dump /home/git-svn-mirror/pushmi-svn-mirror/ 2>/dev/null | gzip | pv > /home/git-svn-mirror/produced-svndump/mediawiki-pushmi-svndump.gz
From d580c4a75e4009110a1ec7eee161a18746db441e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=C3=86var=20Arnfj=C3=B6r=C3=B0=20Bjarmason?= <avarab@gmail.com>
Date: Mon, 3 May 2010 18:21:36 +0000
Subject: [PATCH] ionice: non-cryptic error message when ionice can't execvp
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Previously ionice would reply like this when it couldn't find the
command to execute:
From 952e22021167a6ec9f2566462fb23984da9e2c42 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=C3=86var=20Arnfj=C3=B6r=C3=B0=20Bjarmason?= <avarab@gmail.com>
Date: Thu, 6 May 2010 20:45:18 +0000
Subject: [PATCH/RFC v2] Hacky version of a glob() driven config include
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Add support for a special `voodoo.include` config variable. Its
contents will be globbed, and the files it expands to included as
From 3156918640c7fbb2584405f9bf1a2249626eaba4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=C3=86var=20Arnfj=C3=B6r=C3=B0=20Bjarmason?= <avarab@gmail.com>
Date: Sat, 15 May 2010 18:24:49 +0000
Subject: [PATCH] Use $EMACS_SERVER_SOCKET_DIR for server-socket-dir if it's defined
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
This allows for overriding the directory where emacsclient looks for
the server socket without overriding TMPDIR indiscriminately.
#!/usr/bin/env perl
use 5.10.0;
use strict;
use warnings;
use Test::More 'no_plan';
my @rx = (
qr/^ (\p{Upper}+|\p{Lower}+)+ \p{Upper}+ (\p{Lower}+|\p{Upper}+)* $/x,
qr/^(?:[[:upper:]][[:lower:]])+[[:upper:]]?$/,
qr/\b[[:upper:]][[:lower:]]+\b/,
s/iter lib Hailo System Hailo
lib Hailo 19.7 -- -3%
System Hailo 19.1 4% --
sub foo {
my ($self, $arg, $u, $ment) = @_;
...
method foo($arg, $u, $ment) {
...
s/iter lib Hailo System Hailo
lib Hailo 13.7 -- -1%
System Hailo 13.5 1% --
use 5.010;
use strict;
use warnings;
use autodie;
use Benchmark qw/ :all /;
use File::Slurp qw/ slurp /;
use Regexp::Common qw/URI/;
my $file = $ARGV[0];
my @file = split /\n/, slurp $file;