fix a bug

omzn · Jan 28, 2017 · dd2c5c7 · dd2c5c7
1 parent 44b7d15
commit dd2c5c7
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/pman3.cgi b/pman3.cgi
@@ -4318,13 +4318,13 @@ sub createAList {
     $lquot = $rquot = "&#34;" if ($mode eq "list" || $mode eq 'detail');
 
     if ($$ent{'style'} eq "article") {
-	$aline .= "$lquot$t,$rquot $jj, $vvnn $pp $yymm.";
+	$aline .= "$lquot$t,$rquot $jj, $vvnn $pp, $yymm.";
 #	$aline .= "\{$t\}\{$jj, $vvnn $pp\}\{$yy\}\{ほげほげ\}";
 	if ($check{'jcr'} && $$ent{'impactfactor'} ne "") {
 	    $aline .= " (JCR: $$ent{'impactfactor'})";
 	}
     } elsif ($$ent{'style'} eq "inproceedings") {
-	$aline .= "$lquot$t,$rquot $edr $bkt $vvnn $pp $yymm.";
+	$aline .= "$lquot$t,$rquot $edr $bkt $vvnn $pp, $yymm.";
 #	$aline .= "\{$t\}\{$edr $bkt $vvnn $pp\}\{$yy\}\{ほげほげ\}";
 	if ($$ent{'note'} ne "" && $check{'note'}) {
 	    $aline .= " ($$ent{'note'})";
@@ -4333,7 +4333,7 @@ sub createAList {
 	    $aline .= " (Acceptance rate: $$ent{'acceptance'})";
 	}
     } elsif ($$ent{'style'} eq "incollection") {
-	$aline .= "$t, $edr $bkt $chp $pp $pub $yy.";
+	$aline .= "$t, $edr $bkt $chp $pp $pub, $yy.";
     } elsif ($$ent{'style'} =~ /(in)?book|manual/) {
 	$aline .= "$t, $pub $yy.";
     } elsif ($$ent{'style'} eq "phdthesis") {