urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

improve formatting

master
Joey Hess 2008-07-26 01:58:36 -04:00
parent 278ae9afea
commit fe2fe5aa4b
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
IkiWiki/Setup/Standard.pm
View File

@ -18,6 +18,8 @@ sub generate (@) { #{{{
eval q{use Data::Dumper}; eval q{use Data::Dumper};
error($@) if $@; error($@) if $@;
local $Data::Dumper::Terse=1; local $Data::Dumper::Terse=1;
local $Data::Dumper::Sortkeys=1;
local $Data::Dumper::Pad="\t";
my @ret="#!/usr/bin/perl my @ret="#!/usr/bin/perl
# Setup file for ikiwiki. # Setup file for ikiwiki.
@ -53,6 +55,7 @@ use IkiWiki::Setup::Standard {";
my $dumpedvalue=Dumper($value); my $dumpedvalue=Dumper($value);
chomp $dumpedvalue; chomp $dumpedvalue;
$dumpedvalue=~/^\t//;
push @ret, "\t$prefix$key=$dumpedvalue,"; push @ret, "\t$prefix$key=$dumpedvalue,";
} }
push @ret, ""; push @ret, "";