Parent Directory | Revision Log | Patch
revision 564 by dpavlin, Wed Nov 9 11:51:18 2011 UTC | revision 570 by dpavlin, Sun May 25 08:49:40 2014 UTC | |
---|---|---|
# | Line 9 use Data::Dump qw(dump); | Line 9 use Data::Dump qw(dump); |
9 | ||
10 | our $audit; | our $audit; |
11 | ||
12 | eval { | #eval { |
13 | require MongoDB; | # require MongoDB; |
14 | # | |
15 | my $conn = MongoDB::Connection->new; | # my $conn = MongoDB::Connection->new; |
16 | my $db = $conn->get_database( 'pxelator' ); | # my $db = $conn->get_database( 'pxelator' ); |
17 | $audit = $db->get_collection( 'audit' ); | # $audit = $db->get_collection( 'audit' ); |
18 | }; | #}; |
19 | warn "ERROR: no store for audit: $@" if $@; | #warn "ERROR: no store for audit: $@" if $@; |
20 | ||
21 | ||
22 | sub audit { | sub audit { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |