diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2016-09-10 09:54:59 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2016-09-10 09:54:59 -0700 |
commit | 183d1e48565c838b9f1803086e26dd18b1c64a65 (patch) | |
tree | ac059c117cc17ebcc0bcd9365c5d0dc2482c20ee /lib/DhMakeELPA/Command | |
parent | c726142a4822f0d05e179e6a7a3bddcdfcca5f75 (diff) |
add --version
Diffstat (limited to 'lib/DhMakeELPA/Command')
-rw-r--r-- | lib/DhMakeELPA/Command/Packaging.pm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lib/DhMakeELPA/Command/Packaging.pm b/lib/DhMakeELPA/Command/Packaging.pm index f9714b4..0d932c8 100644 --- a/lib/DhMakeELPA/Command/Packaging.pm +++ b/lib/DhMakeELPA/Command/Packaging.pm @@ -28,7 +28,11 @@ sub extract_basic { $self->debian_dir( $self->main_file('debian') ); $self->find_bins(); $self->pkgname(basename(cwd())); # TODO better? - $self->elpa_version($self->extract_version()); + if ( $self->cfg->version ) { + $self->elpa_version($self->cfg->version); + } else { + $self->elpa_version($self->extract_version()); + } # Find the homepage, license and copyright by looking at the root # .el file, if it exists, of the binary package with the shortest @@ -231,7 +235,7 @@ sub extract_version { if (defined $version) { return $version; } else { - die "Could not determine package version by examining *.el files"; + die "Could not determine package version by examining *.el files.\nPlease specify --version."; } } |