---
name: "Tk::More"
section: "3pm"
platform: "linux"
package: "libtk-pod-perl"
version: "0.9943-2"
release: "Debian 13 (Trixie)"
platforms: ["linux"]
url: "https://new.carta.tech/Tk::More"
---

# Tk::More(3pm)

a 'more' or 'less' like text widget

## NAME

Tk::More - a 'more' or 'less' like text widget

## SYNOPSIS

```
    use Tk::More;
    $more = $parent->More(...text widget options ...);
    $more->Load(FILENAME);
```

## DESCRIPTION

**Tk::More** is a readonly text widget with additional key bindings as found in UNI\* command line tools `"more"` or `"less"`. As in `"more"` an additional status/command line is added at the bottom.

## ADDITIONAL BINDINGS

- Key-g or Home

  goto beginning of file

- Key-G or End

  goto end of file

- Key-f or Next

  forward screen

- Key-b or Prior

  backward screen

- Key-k or Up

  up one line

- Key-j or Down

  down one line

- Key-/

  search forward

- Key-?

  search backward

- Key-n

  find next match

- Key-N

  find previous match

- Key-u

  up half screen

- Key-d

  down half screen

- Key-Return

  down one line

- Key-h

  invoke help window

## OPTIONS

- Name: **fixedFont**

  - Class: **FixedFont**

  - Switch: **-font**

  Set the font of the viewer widget. This is by default a fixed font.

- Name: **searchCase**

  - Class: **SearchCase**

  - Switch: **-searchcase**

  Set if searching should be done case-insensitive. Defaults to true.

- Switch: **-helpcommand**

  Sets the command for the "h" (help) key.

## METHODS

- Load($file, %args)

  Load *$file* into the widget. *%args* may be one of the following

  - \-encoding =\> *$encoding*

    Assume the encoding of the file to be *$encoding*. If none is given, then assume no encoding (which is equivalent to iso-8859-1).

- AddQuitBindings

  Convenience method to add the bindinds Key-q and Control-Key-q to close the Toplevel window containing this More widget.

## BUGS

Besides that most of more bindings are not implemented. This bugs me most (high to low priority):

\* better status line implementation

\* Cursor movement: up/down move displayed area regardless where\
   insert cursor is

\* add History, Load, Search (also as popup menu)

## SEE ALSO

Tk::ROText, [**more**(1)](/more/1.md), tkmore, [**less**(1)](/less/1.md)

## AUTHOR

Achim Bohnet \<*ach@mpe.mpg.de*\>

Currently maintained by Slaven Rezic \<*slaven@rezic.de*\>.

Copyright (c) 1997-1998 Achim Bohnet. All rights reserved.  This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.