--- svn/index.cgi	2008/10/25 15:29:38	35
+++ svn/index.cgi	2008/10/25 15:38:03	36
@@ -9,20 +9,17 @@
 use Data::Dump qw/dump/;
 use JSON;
 use CGI;
+use File::Slurp;
 
 my $debug = $ENV{'DEBUG'} || 0;
 
-my $limit = 1000;
-
-my $repository_dir = '/srv/svn';
-my $svnweb = 'https://svn-strix.carnet.hr/private/svnweb/index.cgi/%s/revision?rev=%d';
+my $config_path = $0;
+$config_path =~ s/.cgi/.js/;
+my $config = from_json( read_file( $config_path ) );
+my $repository_dir = $config->{repository_dir} || die "no repository_dir in $config_path";
+my $svnweb = $config->{svnweb} || die "no svnweb in $config_path";
 
-# my local config for development
-$repository_dir = '/home/dpavlin/private/svn';
-$svnweb = 'http://localhost/svnweb/index.cgi/%s/revision?rev=%d';
-# my local svk mirrors
-$repository_dir = '/home/dpavlin/.svk';
-$svnweb = 'http://localhost/svnweb/svk/index.cgi/%s/revision?rev=%d';
+my $limit = 1000;
 
 # for older JSON
 #sub encode_json { objToJson( @_ ) }