X-Git-Url: http://git.jankratochvil.net/?p=www.jankratochvil.net.git;a=blobdiff_plain;f=project%2FChangeLog.pm;h=a5aa3b4145cf724e788470cf3e63f1d7ce3e96d7;hp=4cae2acd9d764e9ade8cacf55d5513dd7c91b7b2;hb=886ab9c87febce040d1ccfb7b991212c49e2a080;hpb=1db749bbc5a1cae4f28c28c3b88ff5948dbf5806 diff --git a/project/ChangeLog.pm b/project/ChangeLog.pm index 4cae2ac..a5aa3b4 100755 --- a/project/ChangeLog.pm +++ b/project/ChangeLog.pm @@ -44,7 +44,11 @@ My::Web->heading(); local *F; open F,"" - ."cvs -n -q -d ".$W->{"pserver"}.":".$W->{"pserver_path"}." rlog ".$W->{"args"}{"cvs"} + +#pserver: +# ."cvs -n -q -d ".$W->{"pserver"}.":".$W->{"pserver_path"}." rlog ".$W->{"args"}{"cvs"} + ."cvs -n -q -d "."/home/lace/pserver/cvs"." rlog ".$W->{"args"}{"cvs"} + ." |perl -p -e 's#^RCS file: ".$W->{"pserver_path"}.'/(.*?)(?:/Attic/|/)?([^/]*),v$#$&\nWorking file: $1/$2#;'."'" ." |cvs2cl --stdin --stdout --window 3600 --separate-header --no-wrap --usermap ".path_abs_disk("/cvs2cl-usermap") ." |";