From 7ba4eef8ca7971b27a563abde2eaffa1b21c07ce Mon Sep 17 00:00:00 2001
From: ellson <devnull@localhost>
Date: Wed, 30 Apr 2008 16:54:13 +0000
Subject: [PATCH] make cmap_tester.tcl handle output filenames from "dot ...
 -O"

---
 cmd/dot/cmap_tester.tcl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/cmd/dot/cmap_tester.tcl b/cmd/dot/cmap_tester.tcl
index 362ed3c83..2bde46e06 100755
--- a/cmd/dot/cmap_tester.tcl
+++ b/cmd/dot/cmap_tester.tcl
@@ -23,6 +23,12 @@ if {[file exists $fn.gif]} {
 	set image_type gif
 } elseif {[file exists $fn.png]} {
 	set image_type png
+} elseif {[file exists [lindex $argv 0].png]} {
+	set fn [lindex $argv 0]
+	set image_type png
+} elseif {[file exists [lindex $argv 0].gif]} {
+	set fn [lindex $argv 0]
+	set image_type gif
 } else {
 	puts stderr "image file $fn.gif or $fn.png does not exist."
 	exit
-- 
2.40.0