From d44517d863e2336f82299f7d3f5fcb68a84fe595 Mon Sep 17 00:00:00 2001
From: ceb <clareb@felix.relativity.greenend.org.uk>
Date: Sat, 4 Jul 2009 21:45:05 +0100
Subject: [PATCH] Use tmpfile trick for pixmaps too [-iwj]

---
 pctb/dictionary-manager | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/pctb/dictionary-manager b/pctb/dictionary-manager
index ad05c6b..5e108a7 100755
--- a/pctb/dictionary-manager
+++ b/pctb/dictionary-manager
@@ -422,8 +422,10 @@ proc required/pixmap {} {
 	if {![string length $ppml]} break
 	append ppm $ppml "\n"
     }
-    set data [exec pnmscale 2 << $ppm]
-    image create photo image/main -data $data
+    set tmpfile ./#dictimage#.tmp
+    exec pnmscale 2 << $ppm >$tmpfile
+    image create photo image/main -file $tmpfile
+    file delete $tmpfile
 
     set alloptions [exec ./database-info-fetch $unk_what]
 
-- 
2.30.2