Index: openacs-4/packages/acs-subsite/www/shared/1pixel.tcl.orig
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/Attic/1pixel.tcl.orig,v
diff -u -N
--- openacs-4/packages/acs-subsite/www/shared/1pixel.tcl.orig	13 Mar 2002 22:50:53 -0000	1.2
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,40 +0,0 @@
-# 1pixel.tcl,v 1.1.2.2 2000/02/03 10:00:24 ron Exp
-# File:        index.tcl
-# Date:        28 Nov 1999
-# Author:      Jon Salz <jsalz@mit.edu>
-# Description: Generates a 1-pixel GIF image with a certain color.
-# Inputs:      r g b
-
-ReturnHeaders "image/gif"
-
-set_the_usual_form_variables
-
-set file [open "[ns_info pageroot]/graphics/1pixel.header"]
-ns_writefp $file
-close $file
-
-if { [util_aolserver_2_p] } {
-    if { $r == 0 } { set r 1 }
-    if { $g == 0 } { set g 1 }
-    if { $b == 0 } { set b 1 }
-
-    ns_write "[format "%c%c%c" $r $g $b]"
-} else {
-    # Can't figure out how to write binary data using AOLserver 3 (it
-    # insist on UTF8-encoding it). So we write to a file, then dump
-    # the file's contents.
-
-    set file_name [ns_tmpnam]
-    ns_log "Notice" "logging to $file_name"
-    set file [open $file_name w+]
-    fconfigure $file -encoding binary
-    puts -nonewline $file "[format "%c%c%c" $r $g $b]"
-    seek $file 0
-    ns_writefp $file
-    close $file
-    ns_unlink $file_name
-}
-
-set file [open "[ns_info pageroot]/graphics/1pixel.footer"]
-ns_writefp $file
-close $file