diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/sbin/CST | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/sbin/CST b/lib/sbin/CST index cc19aa7c..1f407dcc 100644 --- a/lib/sbin/CST +++ b/lib/sbin/CST @@ -231,6 +231,15 @@ sub CreateThornList $package = $1; $thorn_name = $2; + # Check valid arrangement name + if (!TestName(1,$package)) + { + &CST_error(0, "Arrangement name $package is not valid", + 'Arrangement names must begin with a letter, can only contain ' . + 'letters, numbers and underscores, and must contain at most 27 ' . + 'characters', __LINE__, __FILE__); + } + # Check valid thornname if (!TestName(1,$thorn_name)) { |