Current File : //vendor/psy/psysh/src/Readline/Interactive/Actions/DedentLeadingIndentationAction.php
<?php
/*
* This file is part of Psy Shell.
*
* (c) 2012-2026 Justin Hileman
*
* For the full copyright and license information, please view the LICENSE
* file that was distributed with this source code.
*/
namespace Psy\Readline\Interactive\Actions;
use Psy\Readline\Interactive\Input\Buffer;
use Psy\Readline\Interactive\Readline;
use Psy\Readline\Interactive\Terminal;
/**
* Dedent leading indentation to the previous tab stop.
*
* Returns false when the cursor is not in leading indentation.
*/
class DedentLeadingIndentationAction implements ActionInterface
{
/**
* {@inheritdoc}
*/
public function execute(Buffer $buffer, Terminal $terminal, Readline $readline): bool
{
if (!$readline->isMultilineMode()) {
return false;
}
$line = $buffer->getCurrentLineText();
$indentLength = \strspn($line, " \t");
if ($indentLength === 0) {
return false;
}
$cursorInLine = $buffer->getCursorPositionInLine();
if ($cursorInLine > $indentLength) {
return false;
}
// Cursor is at line start: forward-delete leading indentation.
if ($cursorInLine === 0) {
if ($line[0] === "\t") {
return $buffer->deleteForward(1);
}
$leadingSpaces = \strspn($line, ' ');
return $buffer->deleteForward($buffer->spacesToPreviousTabStop($leadingSpaces));
}
// Cursor is within leading whitespace: backward-delete to previous tab stop.
if ($line[$cursorInLine - 1] === "\t") {
return $buffer->deleteBackward(1);
}
$beforeCursor = \substr($line, 0, $cursorInLine);
$trailingSpaces = \strlen($beforeCursor) - \strlen(\rtrim($beforeCursor, ' '));
return $buffer->deleteBackward($buffer->spacesToPreviousTabStop($trailingSpaces));
}
/**
* {@inheritdoc}
*/
public function getName(): string
{
return 'dedent-leading-indentation';
}
}
Mini Shell