perl-GStreamer r96 - trunk

[tsch svn gnome org]

Author: tsch
Date: Mon Dec 15 20:16:17 2008
New Revision: 96
URL: http://svn.gnome.org/viewvc/perl-GStreamer?rev=96&view=rev

Log:
(GST_TIME_ARGS): Improve the formatting of the return statement.


Modified:
   trunk/ChangeLog
   trunk/GStreamer.pm

Modified: trunk/GStreamer.pm
==============================================================================
--- trunk/GStreamer.pm	(original)
+++ trunk/GStreamer.pm	Mon Dec 15 20:16:17 2008
@@ -61,10 +61,12 @@
 sub GST_TIME_ARGS {
   my ($t) = @_;
 
-  return ($t / (GST_SECOND * 60 * 60),
-         ($t / (GST_SECOND * 60)) % 60,
-         ($t / GST_SECOND) % 60,
-         $t % GST_SECOND);
+  return (
+    ($t / (GST_SECOND * 60 * 60)),
+    ($t / (GST_SECOND * 60)) % 60,
+    ($t / GST_SECOND) % 60,
+    ($t % GST_SECOND)
+  );
 }
 
 use constant GST_RANK_NONE => 0;