]>
Commit | Line | Data |
---|---|---|
40f2bc5e DM |
1 | package PMG::pmgcfg; |
2 | ||
3 | use strict; | |
4 | use vars qw(@ISA); | |
5 | ||
6 | sub package { | |
7 | return '@PACKAGE@'; | |
8 | } | |
9 | ||
10 | sub version { | |
11 | return '@VERSION@'; | |
12 | } | |
13 | ||
14 | sub release { | |
15 | return '@PACKAGERELEASE@'; | |
16 | } | |
17 | ||
18 | sub repoid { | |
19 | return '@REPOID@'; | |
20 | } | |
21 | ||
22 | # this is diplayed on the GUI | |
23 | sub version_text { | |
24 | return '@VERSION@-@PACKAGERELEASE@/@REPOID@'; | |
25 | } | |
26 | ||
27 | # this is returned by the API | |
28 | sub version_info { | |
29 | return { | |
30 | 'version' => '@VERSION@', | |
31 | 'release' => '@PACKAGERELEASE@', | |
32 | 'repoid' => '@REPOID@', | |
33 | } | |
34 | } | |
35 | ||
36 | 1; |