Fix simplify ’ char using s// (using tr// expands it thrice).

1 files changed, 1 insertions, 1 deletions

diff --git a/localmarkdown2sms b/localmarkdown2sms
index 2de3476..fc771f6 100755
--- a/localmarkdown2sms
+++ b/localmarkdown2sms
@@ -182,7 +182,7 @@ sub tidymsg {
 	$msg =~ s/(\S)\n([^\n])/$1 $2/g;	# convert newline to space
 	$msg =~ s/\h*$//g;			# strip all trailing spaces
 	$msg =~ s/^\s*(\w*?.*?)\s*$/$1/s;	# strip surrounding space
-	$msg =~ tr/’/'/;			#'simplify non-GSM chars
+	$msg =~ s/’/'/g;			#'simplify non-GSM chars
 	$msg =~ s/…/.../g;			# simplify ellipsis
 	$msg =~ s/\.\.+/.../g;			# multiple dots → psudo-ellipsis
 	return $msg;