File: pod_audio_properties.patch

package info (click to toggle)
libaudio-file-perl 0.11-4
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 288 kB
  • sloc: perl: 498; makefile: 2
file content (16 lines) | stat: -rw-r--r-- 562 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Author: gregor herrmann <gregoa@debian.org>
Bug-Debian: #524739
Description: fix example in POD
Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=125648

--- a/lib/Audio/File.pm
+++ b/lib/Audio/File.pm
@@ -15,7 +15,7 @@
   my $file = Audio::File->new( "foo.bar" );
 
   print "The ". $file->type() ."-file ". $file->name
-  		." is ". int $file->length() ." seconds long.\n";
+  		." is ". int $file->audio_properties->length() ." seconds long.\n";
 
   print "It's interpreted by ". $file->tag->artist()
   		." and called ". $file->tag->title() ".\n";