diff options
author | Daniel Friesel <derf@finalrewind.org> | 2011-10-29 20:52:45 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2011-10-29 20:52:45 +0200 |
commit | 33eab21aedb69309006789d84741b33a9ef8f7cf (patch) | |
tree | 63a047b17be9d9f5de71f55f1a7211f465fe64c4 /lib/App | |
parent | d6fb74fc9f292d1203421cc1f5fa0c34c94094ad (diff) |
Proper destination shortening, add ?line= and ?platform= (the latter sucks)
Diffstat (limited to 'lib/App')
-rw-r--r-- | lib/App/VRR/Fakedisplay.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/App/VRR/Fakedisplay.pm b/lib/App/VRR/Fakedisplay.pm index b380382..2546248 100644 --- a/lib/App/VRR/Fakedisplay.pm +++ b/lib/App/VRR/Fakedisplay.pm @@ -53,12 +53,13 @@ sub locate_char { when (q{:}) { $y = 30; $x = 0 } when (q{-}) { $y = 30; $x = 10 } when (q{.}) { $y = 30; $x = 20 } - when (q{,}) { $y = 30, $x = 30 } + when (q{,}) { $y = 30; $x = 30 } + when (q{/}) { $y = 30; $x = 40 } } given ($char) { when (/[WwMm]/) { $w = 8 } - when (/[BDErt ]/) { $w = 5 } + when (/[BDEFrt ]/) { $w = 5 } when (/[il1:]/) { $w = 4 } when (/[.,]/) { $w = 3 } } |