Projekt Term::ReadLine::Tiny - #176993 (Projekte)

Kuerbis

2014-08-26 19:14

User since
2011-03-20
942 Artikel
BenutzerIn
[default_avatar]

Wenn ich nicht die Anzahl der Zeilen kenne, die der String benötigt, dann funktioniert dieser Teil nicht mehr, der dafür sorgt, dass am Ende des Terminalfensters Platz für den String gemacht wird.

Code (perl): (dl )

    $self->{plugin}->__restore_cursor_position();
    if ( $str_row ) { # $str_row + 1: Anzahl der Zeilen die der String benötigt
        print "\n" x $str_row;
        $self->{plugin}->__up( $str_row );
    }
    $self->{plugin}->__clear_output( $self->{prev_str_cols} );
    $self->{plugin}->__save_cursor_position();