alias -l regesc {
return /(\Q $+ $replacecs($1, \E, \E\\E\Q) $+ \E)/ug $+ $prop
}
alias nremove {
var %n = $2
return $regsubex($1, $regesc($3).i, $iif(\n > %n, \1))
}
alias nremovecs {
var %n = $2
return $regsubex($1, $regesc($3), $iif(\n > %n, \1))
}