git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
browser: omit superfluous usage class
[sheet.git]
/
screen.plp
diff --git
a/screen.plp
b/screen.plp
index a99dc98d840f800e033c8b14853afb26ed036f6c..c075a4e23fb1488b91eb6dca266e27c8ab9e1fd7 100644
(file)
--- a/
screen.plp
+++ b/
screen.plp
@@
-2,7
+2,7
@@
Html({
title => 'screen cheat sheet',
Html({
title => 'screen cheat sheet',
- version => '
v1.0
',
+ version => '
1.1
',
description => [
"Interactive cheat sheet for the Screen terminal manager,",
"describing the function of each key.",
description => [
"Interactive cheat sheet for the Screen terminal manager,",
"describing the function of each key.",
@@
-11,7
+11,6
@@
Html({
screen sheet cheat reference overview commands keyboard
terminal window manager
'],
screen sheet cheat reference overview commands keyboard
terminal window manager
'],
- charset => $sign{charset},
stylesheet => [qw'light dark circus mono red terse'],
keys => 1,
});
stylesheet => [qw'light dark circus mono red terse'],
keys => 1,
});
@@
-21,23
+20,21
@@
Html({
<h2>normal mode (default)</h2>
<h2>normal mode (default)</h2>
-<ul id="rows">
-
<:
use Shiar_Sheet::Keyboard 2;
<:
use Shiar_Sheet::Keyboard 2;
-my $info = do 'screen.inc.pl' or die $! // $@;
+my $info = do 'screen.eng.inc.pl' or die $@ // $!;
+$info->{def} = do 'screen.inc.pl';
my $keys = Shiar_Sheet::Keyboard->new($info);
$keys->map($get{map}) or undef $get{map};
$keys->print_rows($get{rows});
:>
my $keys = Shiar_Sheet::Keyboard->new($info);
$keys->map($get{map}) or undef $get{map};
$keys->print_rows($get{rows});
:>
-</ul>
<hr>
<div class="help">
<div class="left">
<:
<hr>
<div class="help">
<div class="left">
<:
- $keys->print_legend('legend-types', [
map { "g$_" } 0 .. 8
]);
+ $keys->print_legend('legend-types', [
'g1' .. 'g7', 'g9'
]);
:>
</div>
:>
</div>
@@
-49,9
+46,6
@@
$keys->print_rows($get{rows});
<ul class="legend legend-set">
<li>keyboard <strong>map</strong> is
<:= $get{map} ? 'set to ' : '' :><em><:= $keys->{map} :></em>
<ul class="legend legend-set">
<li>keyboard <strong>map</strong> is
<:= $get{map} ? 'set to ' : '' :><em><:= $keys->{map} :></em>
- <li><strong>ascii</strong> mode is
- <:= defined $sign{-ascii} && 'forced ' :><em><:=
- $sign{-ascii} ? 'on' : 'off' :></em>
<li><strong>keys</strong> are
<em><:= $showkeys ? 'always shown' : 'hidden if unassigned' :></em><:=
!defined $showkeys && ' by default' :>
<li><strong>keys</strong> are
<em><:= $showkeys ? 'always shown' : 'hidden if unassigned' :></em><:=
!defined $showkeys && ' by default' :>