add a comment explaining a particular text transformation

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index a0cb70cc720b3b77315f3cb098364c7d9e49f85c..48e311563fd706460444d9e76bf1f3b41e0f46e7 100644 (file)
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -158,6 +158,9 @@ sub do_cmd_hackscore{
 
 sub codetext($){
     my $text = "$_[0]";
+    # Make sure that "---" is not converted to "--" later when
+    # LaTeX2HTML tries converting em-dashes based on the conventional
+    # TeX font ligatures:
     $text =~ s/--/-\-/go;
     return $text;
 }