gsu: Introduce gsu_config_var_prefix.

It defaults to the $gsu_name, i.e. this is a backwards-compatible change.

diff --git a/funcs/gsu b/funcs/gsu
index 9bc7c7bcfb701aacb917e2604bde155871f26c65..129757ace42a3cdeaa0b72cc582f97a3eb3d289c 100644 (file)
--- a/funcs/gsu
+++ b/funcs/gsu
@@ -149,7 +149,7 @@ com_prefs()
                local name= option_type= default_value= required=
                local description= help_text=
                eval "${gsu_options[$i]}"
-               eval val='"$'${gsu_name}_$name'"'
+               eval val='"$'${gsu_config_var_prefix}_$name'"'
                case "$required" in
                true|yes)
                        printf "# required"
@@ -294,6 +294,7 @@ _gsu_check_options()
 
                eval "${gsu_options[$i]}"
 
+
                # Check name. It must be non-empty and consist of [a-zA-Z_0-9]
                # only.  Moreover it must not start with [a-zA-Z].
 
@@ -318,7 +319,7 @@ _gsu_check_options()
                        return
                esac
 
-               eval ${gsu_name}_$name='"'${val:=$default_value}'"'
+               eval ${gsu_config_var_prefix}_$name='"'${val:=$default_value}'"'
 
                # Check option type. ATM, only num and string are supported
                # Other types may be added without breaking compatibility
@@ -344,6 +345,7 @@ gsu()
        local i
 
        _gsu_self="$(basename $0)"
+       gsu_config_var_prefix="${gsu_config_var_prefix:=$gsu_name}"
        _gsu_init_errors
        _gsu_check_options
        if [[ "$ret" -lt 0 ]]; then