2a3
> # Modified by Jason McIntosh.
5a7,9
> use warnings;
> use strict;
> 
9a14,15
> use MT::Comment;
> use URI::Escape;
12c18
< our $VERSION = '1.02';
---
> our $VERSION = '1.03l';
84,85c90,93
< 	return sprintf(qq(<a title="%s" href="javascript:void(0);" onclick="replyComment(%d, %d, '%s', '%s')">%s</a>),
<                    $text, $entry_id, $comment->id, $comment->author, $created_on, $text);
---
> 	my $author = uri_escape($comment->author, q{'"});
> 
> 	return sprintf(qq(<a title="%s" href="#comments-open" onclick="replyComment(%d, %d, '%s', '%s')">%s</a>),
>                    $text, $entry_id, $comment->id, $author, $created_on, $text);
120c128
< 	anchor.innerHTML = author;
---
> 	anchor.innerHTML = unescape(author);
133a142,169
> 
> 	my $invocation = '';
> 	my $app = MT->instance;
> 	if ( (my $parent_id = $app->param('simplythreaded_parent_id')) 
>              && (my $comment = $ctx->stash('comment')) ) {
> 	    my $entry_id = $ctx->stash('entry')->id;
> 	    my $format = $args->{format} || '%b %e, %Y %l:%M %p';
> 	    my $created_on = format_ts($format, $comment->created_on, 
> 				       $ctx->stash('blog'));
> #	    my $author = uri_escape($comment->author, q{'"});
> 	    my $parent_comment = MT::Comment->load($parent_id);
> 	    my $author = uri_escape($parent_comment->author, q{'"});
> 	    $invocation .= <<'HTML';
> <script type="text/javascript">
> <!--
> HTML
>             $invocation .= sprintf( qq(replyComment(%d, %d, '%s', '%s') ),
> 			$entry_id,
> 			$parent_id,
> 			$author,
> 			$created_on,
> 				);
> 	    $invocation .= "\n";
> 	    $invocation .= <<'HTML';
> // -->
> </script>
> HTML
>         }
135c171
< 	return $script.$para;
---
> 	return $script.$para.$invocation;