getrevision.pl (a8d3c348) getrevision.pl (eb479a10)
1#**************************************************************
2#
3# Licensed to the Apache Software Foundation (ASF) under one
4# or more contributor license agreements. See the NOTICE file
5# distributed with this work for additional information
6# regarding copyright ownership. The ASF licenses this file
7# to you under the Apache License, Version 2.0 (the
8# "License"); you may not use this file except in compliance

--- 17 unchanged lines hidden (view full) ---

26BEGIN {
27 if ( !defined($ENV{SOLARENV}) ) {
28 die "No environment found (environment variable SOLARENV is undefined)";
29 }
30 push(@lib_dirs, "$ENV{SOLARENV}/bin/modules");
31}
32use lib (@lib_dirs);
33
1#**************************************************************
2#
3# Licensed to the Apache Software Foundation (ASF) under one
4# or more contributor license agreements. See the NOTICE file
5# distributed with this work for additional information
6# regarding copyright ownership. The ASF licenses this file
7# to you under the Apache License, Version 2.0 (the
8# "License"); you may not use this file except in compliance

--- 17 unchanged lines hidden (view full) ---

26BEGIN {
27 if ( !defined($ENV{SOLARENV}) ) {
28 die "No environment found (environment variable SOLARENV is undefined)";
29 }
30 push(@lib_dirs, "$ENV{SOLARENV}/bin/modules");
31}
32use lib (@lib_dirs);
33
34use SvnRevision;
34use RepoRevision;
35
36my $scm_root_dir=dirname($ENV{SRC_ROOT});
37
35
36my $scm_root_dir=dirname($ENV{SRC_ROOT});
37
38print SvnRevision::DetectRevisionId("$scm_root_dir");
38print RepoRevision::DetectRevisionId("$scm_root_dir");