Rev | Line | |
---|
[53] | 1 | #!/usr/bin/perl -w
|
---|
| 2 | #
|
---|
| 3 | # Declare versions that will be used in pb
|
---|
| 4 | # Those are filtered with pb mecanism
|
---|
| 5 | # and have been isolated here to avoid unrelated effects
|
---|
| 6 | #
|
---|
[2489] | 7 | # Copyright B. Cornec 2007-today
|
---|
[1528] | 8 | # Provided under the GPL v2
|
---|
| 9 | #
|
---|
[329] | 10 | package ProjectBuilder::Version;
|
---|
| 11 |
|
---|
[74] | 12 | use strict;
|
---|
[53] | 13 |
|
---|
[329] | 14 | # Inherit from the "Exporter" module which handles exporting functions.
|
---|
| 15 |
|
---|
[2270] | 16 | use vars qw($VERSION $REVISION $PBCONFVER @ISA @EXPORT);
|
---|
[329] | 17 | use Exporter;
|
---|
| 18 |
|
---|
| 19 | # Export, by default, all the functions into the namespace of
|
---|
| 20 | # any code which uses this module.
|
---|
| 21 | our @ISA = qw(Exporter);
|
---|
| 22 | our @EXPORT = qw(pb_version_init);
|
---|
| 23 |
|
---|
[2105] | 24 | $VERSION = "PBVER"."PBEXTDIR";
|
---|
[1156] | 25 | $REVISION = "PBREV";
|
---|
[2270] | 26 | # We fix the format of the conf file for this version of pb
|
---|
| 27 | $PBCONFVER = 1;
|
---|
[1148] | 28 |
|
---|
[74] | 29 | sub pb_version_init {
|
---|
| 30 |
|
---|
[1156] | 31 | my $projectbuilderver = $VERSION;
|
---|
| 32 | my $projectbuilderrev = $REVISION;
|
---|
[2270] | 33 | my $projectbuilderconfver = $PBCONFVER;
|
---|
[74] | 34 |
|
---|
[2279] | 35 | return($projectbuilderver,$projectbuilderrev,$projectbuilderconfver);
|
---|
[74] | 36 | }
|
---|
| 37 | 1;
|
---|
Note:
See
TracBrowser
for help on using the repository browser.