From 6de5e3d06d6f55b4a4ac43e9f625e00d546fc634 Mon Sep 17 00:00:00 2001
From: Nick White <git@njw.me.uk>
Date: Sun, 22 Apr 2012 11:37:42 +0100
Subject: Fix bug which could delete input if clipboard was full

---
 getxbookgui.tcl | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/getxbookgui.tcl b/getxbookgui.tcl
index 69dd8c3..53d19e3 100755
--- a/getxbookgui.tcl
+++ b/getxbookgui.tcl
@@ -53,8 +53,10 @@ proc parseurl {url} {
 		selbin 2
 		# isbn-13 isn't included in b&n book urls, sadly
 	}
-	.input.id delete 0 end
-	.input.id insert 0 "$bookid"
+	if { "$bookid" != "" } {
+		.input.id delete 0 end
+		.input.id insert 0 "$bookid"
+	}
 }
 
 proc watchsel {} {
-- 
cgit v1.2.3