From df8f793c91286f2d0c5b05ed32321a929266ecc3 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 28 Dec 2011 12:14:56 -0800
Subject: [PATCH] Fix JS errors in the confirmation code.

---
 lib/WebGUI/Session/Icon.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/WebGUI/Session/Icon.pm b/lib/WebGUI/Session/Icon.pm
index ad7384c71..922ea34e1 100644
--- a/lib/WebGUI/Session/Icon.pm
+++ b/lib/WebGUI/Session/Icon.pm
@@ -158,7 +158,7 @@ sub _form_with_confirmation {
     $confirm   =~ s/([\\\'])/\\$1/g;
     use WebGUI::Form;
     my $output = WebGUI::Form::formHeader($session, { action => $session->url->append($pageURL,$url_params), });
-    $output   .= '<span class="toolbarIcon" style="vertical-align:middle;"><a href="#" onclick="var ack = confirm('.$confirm.'); if (ack) {this.form.submit();} return false;">';
+    $output   .= q|<span class="toolbarIcon" style="vertical-align:middle;"><a href="#" onclick="var ack = confirm('|.$confirm.q|'); if (ack) {this.form.submit();} return false;">|;
     $output   .= '<img src="'.$self->getBaseURL().$icon_name.'" style="vertical-align:middle;border: 0px;" alt="'.$tag.'" title="'.$tag.'" /></a></span>';
     $output   .= WebGUI::Form::formFooter();
     return $output;