From f000b747ffd54292e9c4fdb4ead673bc398b908d Mon Sep 17 00:00:00 2001
From: Kyle M Hall <kyle@bywatersolutions.com>
Date: Tue, 21 Oct 2014 06:00:53 -0400
Subject: [PATCH] Bug 13124 - Record titles with parentheses causing label weirdness

---
 C4/Labels/Label.pm |    2 --
 1 files changed, 0 insertions(+), 2 deletions(-)

diff --git a/C4/Labels/Label.pm b/C4/Labels/Label.pm
index eb28006..e6df8e1 100644
--- a/C4/Labels/Label.pm
+++ b/C4/Labels/Label.pm
@@ -423,8 +423,6 @@ sub draw_label_text {
         else {
             if ($field_data) {
                 $field_data =~ s/\/$//g;       # Here we will strip out all trailing '/' in fields other than the call number...
-                $field_data =~ s/\(/\\\(/g;    # Escape '(' and ')' for the pdf object stream...
-                $field_data =~ s/\)/\\\)/g;
             }
             eval{$Text::Wrap::columns = $self->{'text_wrap_cols'};};
             my @line = split(/\n/ ,wrap('', '', $field_data));
-- 
1.7.2.5