Dan Brook broquaint
broquaint
/ Weirdness with symbol munging
Created
January 20, 2010 16:25
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| class Gitalist::Git::Repository { | |
| ... | |
| use if $^O ne 'MSWin32', 'I18N::Langinfo', => qw/langinfo CODESET/; | |
| BEGIN { | |
| no strict 'subs'; | |
| *__owner = defined &langinfo | |
| ? method { map { decode(langinfo(CODESET), $_) } (getpwuid $self->path->stat->uid)[6,0] } | |
| : method { return qw/OwnEr GroUp/ } | |
| ; | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /projects ?sortOptions | |
| /<repo>/summary | |
| /<repo>/<commit sha1>/commit | |
| /<repo>/<commit sha1>/diff | |
| /<repo>/<commit sha1>/patch | |
| /<repo>/<commit sha1>/snapshot | |
| /<repo>/<commit sha1>/tree | |
| /<repo>/<commit sha1>/tree/<path> | |
| /<repo>/<commit sha1>/blame/<file name> | |
| /<repo>/<commit sha1>/blob/<file name> |
broquaint
/ Gitalist URI structure.txt
Created
January 23, 2010 14:00
— forked from bobtfish/Gitalist URI structure.txt
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| / ?sortOptions Root repository listing. | |
| /<repo> Repository summary page | |
| /<repo>/shortlog Short log | |
| /<repo>/log Full log | |
| /<repo>/heads Branches | |
| /<repo>/tags Tags | |
| /<repo>/reflog Reflog | |
| /<repo>/<commit sha1> Commit | |
| /<repo>/<commit sha1>/diff Commit diff | |
| /<repo>/<commit sha1>/patch Commit patch |
broquaint
/ cpan-install.pl
Created
May 2, 2010 15:02
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/bin/env perl | |
| # XXX Assumes bootstrap.pl has already run | |
| use FindBin; | |
| BEGIN { | |
| $ENV{CATALYST_LOCAL_LIB} = 1; | |
| do "$FindBin::Bin/env" or die $@; | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| __PACKAGE__->config( | |
| default => 'text/html', | |
| skip => { 'application/xml' => 1 }, | |
| map => { | |
| 'application/json' => [qw/ JSON /], | |
| map { $_ => [qw/ View Default /] } | |
| qw( text/css text/html text/plain | |
| application/atom+xml application/rss+xml | |
| application/rss application/xml ) | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/bin/env perl | |
| use FindBin; | |
| use local::lib "$FindBin::Bin/../local-lib"; | |
| use lib 'lib'; | |
| #use Solr::Admin::Web; | |
| use Web::Simple 'Solr::Admin::Web'; |
broquaint
/ gde33_example.user.js
Created
June 21, 2011 11:15
Working example of GM_xmlhttpRequest speaking XML
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| // ==UserScript== | |
| // @name gde33 XML example | |
| // @namespace https://github.com/broquaint | |
| // @description Working example of GM_xmlhttpRequest speaking XML | |
| // @include http://en.wikipedia.org/wiki/Main_Page | |
| // ==/UserScript== | |
| // For some reason console.log wasn't working, too lazy to investigate why. | |
| unsafeWindow.console.log("Requesting stuff!"); | |
| GM_xmlhttpRequest({ |
broquaint
/ gist:1320861
Created
October 27, 2011 21:01
build_per_context_instance loading a model from command-line args
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| sub build_per_context_instance { | |
| my ($self, $app) = @_; | |
| my %args = (export_ok => $self->export_ok || ''); | |
| my $class; | |
| # Try to get the model from command-line args first. | |
| GetOptionsFromArray($app->run_options->{extra_argv}, 'model=s' => \$class); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| package lmip; | |
| use Modern::Perl; | |
| use Method::Signatures; | |
| use Clone qw(clone); | |
| use Term::ANSIColor qw(:constants); | |
| my %config = ( | |
| diff => { | |
| default => 'synhl_diff', |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defmacro isnt [form msg] | |
| '(is '(not form) 'msg)) |
OlderNewer