#
# HELP: SYNOPSIS:
# HELP:     generic/menu/loadpal
# HELP:
# HELP: DESCRIPTION:
# HELP:     Ask for a palette file and load it.
#
CECHO ${$root.func.var.new("string","tmp")}
VARFROMPROCESS tmp eccet_openfile loadpal ${$root.func.strings.quote($root.global.dir.clut)}
IF ${$tmp=="."} QUIT
RENDERER_LOADCLUT ${$tmp}
VIEW_DISP 1
