diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-10-21 20:45:12 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-10-21 20:45:12 +0000 |
commit | b08306bf2a3f67c621b48de36add11e6c037bce7 (patch) | |
tree | 5bb217c5c0f4d7241c9fdc07d173f1be9f9989c8 | |
parent | 2b3899d4782d6cd9fd447b3a3d396a213c356e32 (diff) | |
download | perl-b08306bf2a3f67c621b48de36add11e6c037bce7.tar.gz |
Fix doc bug #23890, as suggested by Himanshu Garg :
in perltoot, $him->fullname should be $him->fullname->as_string
when passed to printf.
p4raw-id: //depot/perl@21513
-rw-r--r-- | pod/perltoot.pod | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pod/perltoot.pod b/pod/perltoot.pod index 68ce8d408d..03372c7ae5 100644 --- a/pod/perltoot.pod +++ b/pod/perltoot.pod @@ -753,7 +753,7 @@ Finally, here's the test program: $him->fullname->title("St"); $him->age(1); - printf "%s is really %s.\n", $him->name, $him->fullname; + printf "%s is really %s.\n", $him->name, $him->fullname->as_string; printf "%s's age: %d.\n", $him->name, $him->age; $him->happy_birthday; printf "%s's age: %d.\n", $him->name, $him->age; @@ -969,7 +969,7 @@ And here's the test program: $boss->age(47); $boss->peers("Frank", "Felipe", "Faust"); - printf "%s is age %d.\n", $boss->fullname, $boss->age; + printf "%s is age %d.\n", $boss->fullname->as_string, $boss->age; printf "His peers are: %s\n", join(", ", $boss->peers); Running it, we see that we're still ok. If you'd like to dump out your |