aboutsummaryrefslogtreecommitdiff
path: root/upchud.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'upchud.tcl')
-rwxr-xr-xupchud.tcl8
1 files changed, 6 insertions, 2 deletions
diff --git a/upchud.tcl b/upchud.tcl
index 6e39fd6..823ca09 100755
--- a/upchud.tcl
+++ b/upchud.tcl
@@ -5,6 +5,7 @@
# ---
# Directory to place the files to.
set outdir "out/"
+set keep_outdir 0
# The lenght of the random name every file is assigned.
# Setting it to 0 disables random name mangling.
set mangle_lenght 6
@@ -186,8 +187,11 @@ if { ![file isdirectory $outdir] } { file mkdir $outdir }
set output_name [get_out_name $original_name]
eval $write_file $output_name
-send_success $output_name
-
+if { $keep_outdir } {
+ send_success $output_name
+} else {
+ send_success [file tail $output_name]
+}
## Notes
# This is a very useful debug snippet:
#