|
Last change
on this file since 1469 was 1156, checked in by Bruno Cornec, 13 years ago |
- Adds a global variable REVISION for version management
- Do not return in pb_send2target if pb file not available in order to shutdown VM in all cases
- Code and test sbx2setupvm
- setup_v now needs a fake pb_version_init fct added at the end of the script
- Fix pbdistrocheck install comand printing
- Fix mandralinux old distro build in pb.conf (Note only non symlink release files are important)
|
|
File size:
689 bytes
|
| 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 | #
|
|---|
| [329] | 7 | package ProjectBuilder::Version;
|
|---|
| 8 |
|
|---|
| [74] | 9 | use strict;
|
|---|
| [53] | 10 |
|
|---|
| [329] | 11 | # Inherit from the "Exporter" module which handles exporting functions.
|
|---|
| 12 |
|
|---|
| [1156] | 13 | use vars qw($VERSION $REVISION @ISA @EXPORT);
|
|---|
| [329] | 14 | use Exporter;
|
|---|
| 15 |
|
|---|
| 16 | # Export, by default, all the functions into the namespace of
|
|---|
| 17 | # any code which uses this module.
|
|---|
| 18 | our @ISA = qw(Exporter);
|
|---|
| 19 | our @EXPORT = qw(pb_version_init);
|
|---|
| 20 |
|
|---|
| [1156] | 21 | $VERSION = "PBVER";
|
|---|
| 22 | $REVISION = "PBREV";
|
|---|
| [1148] | 23 |
|
|---|
| [74] | 24 | sub pb_version_init {
|
|---|
| 25 |
|
|---|
| [1156] | 26 | my $projectbuilderver = $VERSION;
|
|---|
| 27 | my $projectbuilderrev = $REVISION;
|
|---|
| [74] | 28 |
|
|---|
| 29 | return($projectbuilderver,$projectbuilderrev);
|
|---|
| 30 | }
|
|---|
| 31 | 1;
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
