deblan-mirror/h-m-m
deblan-mirror/h-m-m
1
0
Fork 0
mirror of https://github.com/nadrad/h-m-m.git synced 2024-05-19 23:06:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed ctrl+backspace bug

Browse source
This commit is contained in:
nadrad 2022-09-25 08:58:19 +02:00
parent c870e3b098
commit 8116d7ad4b
1 changed files with 21 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
h-m-m
View file

@ -1148,9 +1148,26 @@ function magic_readline(&$mm, $title)
// ctrl+backspace
elseif ($in=="\010")
{
$from = max(0, mb_strrpos($title, ' ', max(0,min(1,$cursor-mb_strlen($title)-3))));
$title = mb_substr($title, 0, $from) . mb_substr($title,$cursor-1);
$cursor = $from+1;
$from =
max
(
0
,mb_strrpos
(
$title
,' '
,max
(
-mb_strlen($title)
,$cursor-mb_strlen($title)-3
)
)
)
;
$title =
mb_substr($title, 0, $from + ($from>0) )
.mb_substr($title, $cursor-1);
$cursor = $from+1+($from>0);
}
// backspace
@ -1318,7 +1335,7 @@ function edit_node(&$mm, $rewrite = false)
if
(
(
$mm['active_node']==$mm['root_id']
$mm['active_node']==$mm['root_id']
&& $title=='root'
)
or $title=='NEW'