From bf3c47c3d37679fbe9e45775f213adca00e68f46 Mon Sep 17 00:00:00 2001 From: Andrew Johnson Date: Tue, 6 Jan 2009 16:41:56 +0000 Subject: [PATCH] Warn about undefined macros in RELEASE file. --- src/tools/EPICS/Release.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/tools/EPICS/Release.pm b/src/tools/EPICS/Release.pm index 22e247847..ccf8246f2 100644 --- a/src/tools/EPICS/Release.pm +++ b/src/tools/EPICS/Release.pm @@ -84,6 +84,8 @@ sub expandRelease { while (my ($macro, $path) = each %$Rmacros) { while (my ($pre,$var,$post) = $path =~ m/(.*)\$\((\w+?)\)(.*)/) { + warn "Undefined macro \$($var) used in RELEASE file\n" + unless exists $Rmacros->{$var}; $path = $pre . $Rmacros->{$var} . $post; $Rmacros->{$macro} = $path; }