Changeset 021df693bf0087dac900e2f698d4065c8c2856e7
- Timestamp:
- 07/08/08 15:30:27
(5 years ago)
- Author:
- Mark Harrison <mark@omniti.com>
- git-committer:
- Mark Harrison <mark@omniti.com> 1215531027 +0000
- git-parent:
[6b9c9cc891ad219b3f22663481dfaedb6d1ea273]
- git-author:
- Mark Harrison <mark@omniti.com> 1215531027 +0000
- Message:
Removing hardcoded reference to /opt/resmon
git-svn-id: https://labs.omniti.com/resmon/trunk@140 8c0face9-b7db-6ec6-c4b3-d5f7145c7d55
-
Files:
-
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
| r6b9c9cc |
r021df69 |
|
| 3 | 3 | use File::Find; |
|---|
| 4 | 4 | use IO::Socket; |
|---|
| 5 | | |
|---|
| 6 | | # Currently hardcoded. There is probably a good way to work out what the |
|---|
| 7 | | # dir is from how we were called. |
|---|
| 8 | | my $resmondir='/opt/resmon'; |
|---|
| 9 | 5 | |
|---|
| 10 | 6 | my $assess; |
|---|
| … | … | |
| 13 | 9 | my %times; |
|---|
| 14 | 10 | my $debug; |
|---|
| | 11 | my $resmondir; |
|---|
| 15 | 12 | |
|---|
| 16 | 13 | sub update { |
|---|
| … | … | |
| 23 | 20 | # whether there were any files updated or not. |
|---|
| 24 | 21 | $debug = shift; |
|---|
| | 22 | |
|---|
| | 23 | $resmondir = shift; |
|---|
| 25 | 24 | |
|---|
| 26 | 25 | # Check for subversion |
|---|
| r6b9c9cc |
r021df69 |
|
| 31 | 31 | if ($update) { |
|---|
| 32 | 32 | use Resmon::Updater; |
|---|
| 33 | | exit(Resmon::Updater::update($debug)); |
|---|
| | 33 | (my $resmondir = $0) =~ s/\/?[^\/]+$//; |
|---|
| | 34 | exit(Resmon::Updater::update($debug, $resmondir)); |
|---|
| 34 | 35 | } |
|---|
| 35 | 36 | |
|---|
