X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/5ff4b1c1b790314cd654d32ca6d72368d1748283..c11640facf0c976140547ef1b58971ec8a661dd3:/mplayer.plp diff --git a/mplayer.plp b/mplayer.plp index 73e79fb..5cd7d16 100644 --- a/mplayer.plp +++ b/mplayer.plp @@ -1,34 +1,23 @@ -<: -use utf8; -use strict; -use warnings; -no warnings 'qw'; # you know what you doing -no warnings 'uninitialized'; # save some useless checks for more legible code - -use Shiar_Sheet::KeySigns qw(%sign); +<(common.inc.plp)><: + our $VERSION = 'v1.0'; -our $VERSION = 'v1.0'; + use Shiar_Sheet::KeySigns qw(%sign); -$header{content_type} = "text/html; charset=$sign{charset}"; + $header{content_type} = "text/html; charset=$sign{charset}"; :> -mplayer cheat sheet - +mplayer cheat sheet +<:= stylesheet(qw'light dark circus mono red terse') :> <: - my %styles = map {$_ => $_} qw(dark circus mono red terse); - our $style = exists $get{style} && $styles{$get{style}} || 'light'; - printf(qq{\n}, - $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "$_.css", $_ - ) for keys %styles; - our $showkeys = exists $get{keys} && $get{keys} ne '0'; - print "\n".'' unless $showkeys; + print "\n".'' + unless $showkeys; print "\n".'' if $showkeys and $get{keys} eq 'ghost'; :> @@ -44,7 +33,7 @@ $header{content_type} = "text/html; charset=$sign{charset}";
  • @@ -53,7 +42,7 @@ $header{content_type} = "text/html; charset=$sign{charset}"; use Shiar_Sheet::Keyboard; my $keys = Shiar_Sheet::Keyboard->new({do 'mplayer.inc.pl'}); $keys->map($get{map}) or undef $get{map}; -$keys->print_rows($get{rows}); +$keys->print_rows($get{rows}, [1,0]); :> @@ -62,22 +51,18 @@ $keys->print_rows($get{rows});
    -
    aside -
    Temporarily display something without changing state. -
    select -
    Scroll list and/or select a different line. -
    search -
    Go to a specific message entry. -
    edit -
    Modify message flags or contents. -
    command -
    Any other action which does not alter an existing message. -
    send -
    Prepare and/or send a (new) message. -
    leave -
    Exit the opened folder. -
    display -
    Permanently alter/toggle current view. +
    osd +
    Print information or change display. +
    subtitles +
    Alter subtitle selection and settings. +
    video +
    Video output adjustment. +
    audio +
    Sound (track) configuration. +
    playback +
    Playback control. +
    general +
    Other MPlayer features.
    @@ -85,6 +70,8 @@ $keys->print_rows($get{rows});
    key<:= $sign{arg} :>
    Commands with a dot need an argument afterwards. +
    optional +
    Some features depend on setup and/or parameters.