From a8f804837c21d71a6fa5adc127d9b64eb23c47ad Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?llu=C3=ADs=20g=C3=B3mez=20i=20bigord=C3=A0?=
 <lluisbigorda@users.sourceforge.net>
Date: Fri, 23 May 2008 20:46:28 +0000
Subject: changed the code to be in a single file colorgrid.c moved the help
 patch to a more common name

svn path=/trunk/externals/pdvjtools/; revision=9871
---
 colorgrid/base64.tcl | 29 -----------------------------
 1 file changed, 29 deletions(-)
 delete mode 100644 colorgrid/base64.tcl

(limited to 'colorgrid/base64.tcl')

diff --git a/colorgrid/base64.tcl b/colorgrid/base64.tcl
deleted file mode 100644
index 26ad408..0000000
--- a/colorgrid/base64.tcl
+++ /dev/null
@@ -1,29 +0,0 @@
- package require base64
-
- proc encode {} {
-     .txt delete 1.0 end
-     set fileID [open [tk_getOpenFile] RDONLY]
-     fconfigure $fileID -translation binary
-     set rawData [read $fileID]
-     close $fileID
-     set encodedData [base64::encode $rawData]
-     .txt insert 1.0 $encodedData
- }
-
- proc clipcopy {} {
-     clipboard clear
-     clipboard append [.txt get 1.0 end]
- }
-
- wm title . "Base64 Gif Encoder"
- text .txt -wrap none -font "Courier 10"
- menu .mbar
- . configure -menu .mbar
- .mbar add command -label "Encode File" -command encode
- .mbar add command -label "Copy2Clipboard" -command clipcopy
- .mbar add command -label "Exit" -command {destroy .; exit}
-
- pack .txt -expand 1 -fill both
-
- encode
- ### End of Script
-- 
cgit v1.2.1