X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fperllexwarn.pod;h=12ce1f6c82ece36aa5f7e2d8f5bc97e343163918;hb=4e9dada01dea61250de18f52c49ec01866133705;hp=9b614271bb9bc2516934f399d176dfbd8198f9e2;hpb=702815ca71820e02fb479da23518a6420e31af8b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pod/perllexwarn.pod b/pod/perllexwarn.pod index 9b61427..12ce1f6 100644 --- a/pod/perllexwarn.pod +++ b/pod/perllexwarn.pod @@ -383,9 +383,9 @@ Consider the module C below. sub open { my $path = shift ; if ($path !~ m#^/#) { - warnings::warn("changing relative path to /tmp/") + warnings::warn("changing relative path to /var/abc") if warnings::enabled(); - $path = "/tmp/$path" ; + $path = "/var/abc/$path"; } }