View hoho
This file contains 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
merrily around the mistletoe | |
Merrily we go.. Around and around we are spinning, faster and faster as the years go by |
View gist:20983
This file contains 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 MojoMojo::Model::Search; | |
use strict; | |
use base 'Catalyst::Model'; | |
use KinoSearch::InvIndexer; | |
use KinoSearch::Searcher; | |
use KinoSearch::Analysis::PolyAnalyzer; | |
use KinoSearch::Index::Term; |
View gist:27814
This file contains 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
#! perl -w | |
use strict; | |
my $content = '=toc<br /> | |
=toc 2-4<br /> | |
<p>=toc 2</p> | |
<div id="stff">=toc -3<br /> | |
<p>=toc 2-</p> | |
'; | |
View snippet.txt
This file contains 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
[gui] | |
recentrepo = /Users/marcus/Source/git/nordaaker | |
[user] | |
email = marcus@nordaaker.com | |
[github] | |
user = marcusramberg | |
token = 28cca00540c7bb5140307262309f1ae9 | |
[core] | |
editor = mate -w | |
[alias] |
View snippet.txt
This file contains 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
=== t/unit_core_mvc.t | |
================================================================== | |
--- t/unit_core_mvc.t (revision 27978) | |
+++ t/unit_core_mvc.t (local) | |
@@ -1,4 +1,4 @@ | |
-use Test::More tests => 45; | |
+use Test::More tests => 46; | |
use strict; | |
use warnings; | |
View snippet.pl
This file contains 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
We are using L<Template::Toolkit> via L<Catalyst::View::TT> to render most | |
of our HTML. L<Bizmo::View::TT> Is the default view, and adds a wrapper | |
(root/wrapper.tt) to any template processed through it. In order to render | |
templates without the wrapper, set $c->stash->{current_view} to 'TT::Bare'. | |
Separation of concerns is an important principle inside the view as well as | |
between the various components in the application. That means that all | |
javascript code goes into root/static/js/bizmo.js . We are currently using | |
the jQuery framework, which easily lets us apply unobtrusive javascript |
View snippet.pl
This file contains 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
We are using L<Template::Toolkit> via L<Catalyst::View::TT> to render most | |
of our HTML. L<Bizmo::View::TT> Is the default view, and adds a wrapper | |
(root/wrapper.tt) to any template processed through it. In order to render | |
templates without the wrapper, set $c->stash->{current_view} to 'TT::Bare'. | |
Separation of concerns is an important principle inside the view as well as | |
between the various components in the application. That means that all | |
javascript code goes into root/static/js/bizmo.js . We are currently using | |
the jQuery framework, which easily lets us apply unobtrusive javascript |
View snippet.pl
This file contains 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 iwatchthis::Schema::Openid; | |
# Created by DBIx::Class::Schema::Loader v0.03007 @ 2006-11-30 17:47:08 | |
use strict; | |
use warnings; | |
use base 'DBIx::Class'; | |
__PACKAGE__->load_components( "UTF8Columns","ResultSetManager", "Core"); |
View snippet.pl
This file contains 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 openid : Global { | |
my ($self,$c) = @_; | |
eval { | |
if ($c->authenticate({},'openid')) { | |
if (my $person=$c->find_user({ | |
dbix_class=>{ | |
searchargs=> | |
[ {'openids.id'=>$c->user->{url} }, | |
{join=>[qw/openids/]} |
OlderNewer