ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/perl/digital-clock
(Generate patch)

Comparing rxvt-unicode/src/perl/digital-clock (file contents):
Revision 1.9 by root, Mon Jan 23 23:13:03 2006 UTC vs.
Revision 1.12 by root, Tue Sep 4 22:41:11 2012 UTC

1#! perl 1#! perl
2 2
3# this creates a simple digital clock 3=head1 NAME
4
5digital-clock - display a digital clock overlay
6
7=head1 DESCRIPTION
8
9Displays a digital clock using the built-in overlay.
10
11=cut
4 12
5sub on_start { 13sub on_start {
6 my ($self) = @_; 14 my ($self) = @_;
7 15
8 $self->{overlay} = $self->overlay (-1, 0, 8, 1, urxvt::OVERLAY_RSTYLE, 0); 16 $self->{overlay} = $self->overlay (-1, 0, 8, 1, urxvt::OVERLAY_RSTYLE, 0);

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines