diff options
| -rw-r--r-- | lib/AdminPanel/Rpmdragora/init.pm | 5 | ||||
| -rw-r--r-- | lib/AdminPanel/rpmdragora.pm | 1 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lib/AdminPanel/Rpmdragora/init.pm b/lib/AdminPanel/Rpmdragora/init.pm index 1c1906c5..7acdec6a 100644 --- a/lib/AdminPanel/Rpmdragora/init.pm +++ b/lib/AdminPanel/Rpmdragora/init.pm @@ -41,6 +41,7 @@ our @ISA = qw(Exporter); our @EXPORT = qw(init warn_about_user_mode $MODE + $VERSION $changelog_first $default_list_mode %rpmdragora_options @@ -99,7 +100,7 @@ if ($collation_locale) { $collation_locale =~ /UTF-8/ or setlocale(LC_COLLATE, "$collation_locale.UTF-8"); } -our $version = 1; +our $VERSION = "1.0.0"; our %rpmdragora_options; my $i; @@ -113,7 +114,7 @@ foreach (@ARGV) { $rpmdragora_options{$name} = \@values if @values; } else { if ($val eq 'version') { - print "$0 $version\n"; + print "$0 $VERSION\n"; exit(0); } elsif ($val =~ /^(test|expert)$/) { eval "\$::$1 = 1"; diff --git a/lib/AdminPanel/rpmdragora.pm b/lib/AdminPanel/rpmdragora.pm index ae9dec24..0729b0d9 100644 --- a/lib/AdminPanel/rpmdragora.pm +++ b/lib/AdminPanel/rpmdragora.pm @@ -56,7 +56,6 @@ use AdminPanel::Shared::GUI; use Carp; our @ISA = qw(Exporter); -our $VERSION = '2.27'; our @EXPORT = qw( $changelog_first_config $compute_updates |