readline: mark keys setting the kill ring

diff --git a/readline.inc.pl b/readline.inc.pl
index 288885fdc86b4877261d89b3becda6e3eb8d42dd..9253532d91f90488fe57ffa9c777cc243004c2bc 100644 (file)
--- a/readline.inc.pl
+++ b/readline.inc.pl
@@ -25,7 +25,7 @@ use utf8;
        '+b' => ["word back$sign{_}w$sign{_}ard$sign{_}s", 'pm'],
        '+c' => ["capital$sign{_}ise word", 'mi'],
        '^d' => ["delete char", 'mo'],
-       '+d' => ["delete word rem$sign{_}ain$sign{_}der", 'mo'],
+       '+d' => ["delete word rem$sign{_}ain$sign{_}der", 'mo ring'],
 #      '^e' => ["emacs mode", 'me'],
        '^e' => ["end of line", 'pm'],
        '^f' => ["char forward", 'pm'],
@@ -35,7 +35,7 @@ use utf8;
        '^i' => ["complete", 'mi', '(tab)'],
        '^j' => '^m',
        '^+j'=> ["vim mode", 'me'],
-       '^k' => ["delete till eol", 'mo'],
+       '^k' => ["delete till eol", 'mo ring'],
        '^l' => ["clear screen", 'ci'],
        '+l' => ["lowcase word", 'mi'],
        '^m' => ["enter line", 'co', '(enter)'],
@@ -49,10 +49,10 @@ use utf8;
        '^s' => ["search history", 'co'],
        '^t' => ["move char forw$sign{_}ard", 'mi', 'Transpose char'],
        '+t' => ["move word forw$sign{_}ard", 'mi', 'Transpose word'],
-       '^u' => ["delete till bol", 'mo'], # unix
+       '^u' => ["delete till bol", 'mo ring'], # unix
        '+u' => ["upcase word", 'mi'],
        '^v' => ["verbatim char", 'mv'],
-       '^w' => ["delete word", 'mo'], # unix
+       '^w' => ["delete word", 'mo ring'], # unix
 #      '^xBS' => ["delete till bol", 'mo'],
        '^x' => ["extend$sign{_}ed", 'me arg'],
        '^y' => ["yank top", 'co'],

diff --git a/readline.plp b/readline.plp
index 019876f1dc1a4ec28c1957b4d9ea977e59c5a9be..a49c6d3532db2ea38b9ced674c4561e088d9f07e 100644 (file)
--- a/readline.plp
+++ b/readline.plp
@@ -7,7 +7,7 @@ no  warnings 'uninitialized';  # save some useless checks for more legible code
 
 use Shiar_Sheet::KeySigns qw(%sign);  # dependant on $get{ascii}
 
-our $VERSION = 'v1.2';
+our $VERSION = 'v1.0';
 
 $header{content_type} = "text/html; charset=$sign{charset}";
 
@@ -100,7 +100,7 @@ $keys->print_rows($get{static} || '543');
 </div>
 
 <p class="footer">
-       <a href="/" rel="home">sheet.shiar.nl</a>/vim
+       <a href="/" rel="home">sheet.shiar.nl</a>/readline
        <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
        created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
        <a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"