diff options
author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2003-01-04 21:23:43 +0000 |
---|---|---|
committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2003-01-04 21:23:43 +0000 |
commit | 6ae7a38b76a7290f49447bbeaade9e45335c0dd8 (patch) | |
tree | 098245f10bfb2c29bfd61d52981d50167505f52d | |
parent | f866a7c53a4bc0d4e7848898310f9555c50d549d (diff) |
fix line breaks in warning message for missing range description
git-svn-id: http://svn.cactuscode.org/flesh/trunk@3070 17b73243-c579-4c4c-a9d2-2d5706c11dac
-rw-r--r-- | lib/sbin/parameter_parser.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/sbin/parameter_parser.pl b/lib/sbin/parameter_parser.pl index b8cf1b51..19b70460 100644 --- a/lib/sbin/parameter_parser.pl +++ b/lib/sbin/parameter_parser.pl @@ -392,7 +392,8 @@ sub parse_param_ccl # Check description if($delim eq "" || ($delim =~ /::/ && $new_desc =~ /^\s*$/)) { - $message = "Missing range description ($new_ranges) for parameter $variable in param.ccl for thorn $arrangement/$thorn."; + $new_ranges =~ /^\s*(.*)\s*\n/; + $message = "Missing description for range $1 for parameter $variable in param.ccl for thorn $arrangement/$thorn."; $hint = "Each parameter range line should have the syntax <RANGE> :: <\"DESCRIPTION\">"; &CST_error(1,$message,$hint,__LINE__,__FILE__); } |