# HG changeset patch # User Heiko Schlittermann (JUMPER) # Date 1312712710 -7200 # Node ID 67a19ad36d8f822ac931e1263e4df8ba1ace1aa5 # Parent 384b2e03389576e8f1de41eaf0b095339d6605cc added license notice diff -r 384b2e033895 -r 67a19ad36d8f Build.PL --- a/Build.PL Sun Aug 07 12:21:17 2011 +0200 +++ b/Build.PL Sun Aug 07 12:25:10 2011 +0200 @@ -6,6 +6,7 @@ dist_name => "blockfuse", dist_author => "Heiko Schlittermann ", dist_version_from => "bin/blockfuse", + license => "restrictive", script_files => [glob "bin/*"], requires => { perl => "5.10.0", diff -r 384b2e033895 -r 67a19ad36d8f bin/blockfuse --- a/bin/blockfuse Sun Aug 07 12:21:17 2011 +0200 +++ b/bin/blockfuse Sun Aug 07 12:25:10 2011 +0200 @@ -14,7 +14,9 @@ # blockfuse /mnt # rsync --inplace -Pa /mnt/sda1 /images/sda1 -# Just a short hack, not documentation, nothing else. +# Just a short hack, no nice documentation, nothing else. + +# LICENSE: # If your're insterested in extending this tool, please tell me, I'm # willing to put it under some Open Source License. (Currently it's # not!) @@ -28,8 +30,8 @@ use Getopt::Long; use Pod::Usage; +our $VERSION = "0.1"; my $opt_debug = 0; -our $VERSION = "0.1"; GetOptions( "debug!" => \$opt_debug,