www: comments for denoting Plack::Request vs CGI

We'll probably want to continue supporting CGI for mod_perl
compatibility.

1 files changed, 2 insertions, 1 deletions

diff --git a/lib/PublicInbox/WWW.pm b/lib/PublicInbox/WWW.pm
index b4c050b1..411db16f 100644
--- a/lib/PublicInbox/WWW.pm
+++ b/lib/PublicInbox/WWW.pm
@@ -198,6 +198,7 @@ sub get_thread {
 
 sub self_url {
         my ($cgi) = @_;
+                                                # Plack::Request
         ref($cgi) eq 'CGI' ? $cgi->self_url : $cgi->uri->as_string;
 }
 
@@ -362,7 +363,7 @@ sub r301 {
         if (ref($cgi) eq 'CGI') {
                 $url = $cgi->url(-base) . '/';
                 $qs = $cgi->query_string;
-        } else {
+        } else { # Plack::Request
                 $url = $cgi->base->as_string;
                 $qs = $cgi->env->{QUERY_STRING};
         }