调整目录结构

2025-10-23 18:57:37 +08:00
parent 6cf4d9cb03
commit 4966a659aa
2173 changed files with 4343 additions and 11 deletions
--- a/Needed/mini-python/tcl/tix8.4.3/bitmaps/mktransgif.tcl
+++ b/Needed/mini-python/tcl/tix8.4.3/bitmaps/mktransgif.tcl
@@ -0,0 +1,14 @@
+#
+#	$Id: mktransgif.tcl,v 1.1.1.1 2000/05/17 11:08:46 idiscovery Exp $
+#
+#!/usr/local/bin/tclsh
+
+set dont(plusarm.gif)  1
+set dont(minusarm.gif) 1
+
+foreach file [glob *.gif] {
+    if ![info exists dont($file)] {
+	puts "giftool -1 -B $file"
+    }
+}
+