Select Code to Download

            hour => {
                type    => t('Hour'),
...
                type    => t('Second'),
                default => 0,
            },

    # If this method is called from somewhere other than new(), then s
+ome of
    # these defaults may not get applied.
...
    $p{hour}       = 0                          unless exists $p{hour}
+;
    $p{minute}     = 0                          unless exists $p{minut
+e};
    $p{second}     = 0                          unless exists $p{secon
+d};