[interchange] Escape deprecated braces in regex; caused warnings in Perl 5.22.0

[Josh Lavin]

commit 17bac54486dfeb4b5395d7f64603ba9b7a2f4307
Author: Josh Lavin <jlavin at endpoint.com>
Date:   Fri Sep 25 15:16:07 2015 -0700

    Escape deprecated braces in regex; caused warnings in Perl 5.22.0

 lib/Vend/Ship.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/lib/Vend/Ship.pm b/lib/Vend/Ship.pm
index a5633b2..943e3a8 100644
--- a/lib/Vend/Ship.pm
+++ b/lib/Vend/Ship.pm
@@ -979,7 +979,7 @@ sub shipping {
 		}
 		$label =~ s/(%(.))/exists $subst{$2} ? $subst{$2} : $1/eg;
 #::logDebug("label intermediate: $label");
-		$label =~ s/(\$O{(.*?)})/$o->{$2}/eg;
+		$label =~ s/(\$O\{(.*?)\})/$o->{$2}/eg;
 #::logDebug("label returning: $label");
 		return $label;
 	}