aboutsummaryrefslogtreecommitdiff
path: root/perl/lib/Wallet/Object/Password.pm
diff options
context:
space:
mode:
authorRuss Allbery <eagle@eyrie.org>2016-01-17 12:25:15 -0800
committerRuss Allbery <eagle@eyrie.org>2016-01-17 12:25:15 -0800
commit4feab8a987a345e38c44077d1042bf05ec03f0eb (patch)
tree87dee3d0eee63af440cd76fb705240785413766e /perl/lib/Wallet/Object/Password.pm
parent8c9c420553c4f9a1573d5c7ecabd41148f9e49e1 (diff)
Standardize Perl module versions
The versions of all of the wallet Perl modules now match the overall package version except for Wallet::Schema, which is used to version the database schema. Import the test from rra-c-util 5.10 and exclude Wallet::Schema from the tests. Go through all Perl modules and standardize the syntax for setting the version and indicating the required version of Perl. Fix a few other syntax issues while I'm in there.
Diffstat (limited to 'perl/lib/Wallet/Object/Password.pm')
-rw-r--r--perl/lib/Wallet/Object/Password.pm16
1 files changed, 6 insertions, 10 deletions
diff --git a/perl/lib/Wallet/Object/Password.pm b/perl/lib/Wallet/Object/Password.pm
index 3fd6ec8..1db53f3 100644
--- a/perl/lib/Wallet/Object/Password.pm
+++ b/perl/lib/Wallet/Object/Password.pm
@@ -1,6 +1,7 @@
-# Wallet::Object::Password -- Password object implementation for the wallet.
+# Wallet::Object::Password -- Password object implementation for the wallet
#
# Written by Jon Robertson <jonrober@stanford.edu>
+# Copyright 2016 Russ Allbery <eagle@eyrie.org>
# Copyright 2015
# The Board of Trustees of the Leland Stanford Junior University
#
@@ -11,23 +12,18 @@
##############################################################################
package Wallet::Object::Password;
-require 5.006;
+use 5.008;
use strict;
use warnings;
-use vars qw(@ISA $VERSION);
use Crypt::GeneratePassword qw(chars);
use Digest::MD5 qw(md5_hex);
-use Wallet::Config ();
+use Wallet::Config;
use Wallet::Object::File;
-@ISA = qw(Wallet::Object::File);
-
-# This version should be increased on any code change to this module. Always
-# use two digits for the minor version with a leading zero if necessary so
-# that it will sort properly.
-$VERSION = '0.01';
+our @ISA = qw(Wallet::Object::File);
+our $VERSION = '1.03';
##############################################################################
# File naming