X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lib%2FSpeak.pm;h=3a01ba121ed6202c8b4f924a013e129680332656;hb=294415e0b506d050524eecc134dc0fa0b5d57f49;hp=c98feca6ee50a43d4e9ddd1760ab015b4b846fd6;hpb=75f06ef1cd56d531eb9ae086618bce3ff6aaa510;p=clearscm.git

diff --git a/lib/Speak.pm b/lib/Speak.pm
index c98feca..3a01ba1 100644
--- a/lib/Speak.pm
+++ b/lib/Speak.pm
@@ -126,6 +126,13 @@ Returns:
   # Log message to log file if $log was passed in.
   $log->msg($msg);
 
+  # Quote the message
+  #$msg = quotemeta $msg;
+
+  # Change some characters that mess up speech
+  $msg =~ s#\"#\\"#g;
+  $msg =~ s#\$#\\\$#g;
+
   my ($status, @output) = Execute "/usr/local/bin/gt \"$msg\"";
 
   if ($status) {