More(3pm)

💖 Tk::More — the more/less text widget, but make it Perl 🎀

okay bestie, gather round, because this is More(3pm) — a User Contributed Perl Documentation page, aka the manual for Tk::More 💅

---

✨ NAME ✨

Tk::More — a more or less like text widget. literally that's the whole vibe 🦋

---

🌸 SYNOPSIS 🌸

use Tk::More;

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

---

💜 DESCRIPTION 💜

Tk::More is a readonly text widget, but with extra key bindings on top — the same ones you'd find in those UNI* command line tools more or less. And just like in more, there's a bonus status/command line chillin' at the bottom. no cap 👑

---

🎀 ADDITIONAL BINDINGS 🎀

okay so here's the whole keybind menu, bestie. memorize it, it's giving cheat sheet 📋✨

• 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 🌈

each one comes with its Name / Class / Switch trio, keep them straight bestie 🫶

• Name: fixedFont — Class: FixedFont — Switch: -font — sets the font of the viewer widget. by default it's a fixed font. iconic behavior honestly 🖋️
• Name: searchCase — Class: SearchCase — Switch: -searchcase — sets whether searching should be done case-insensitive. defaults to true. yes queen, case-insensitive by default 💅
• Switch: -helpcommand — sets the command for the "h" (help) key. the help key needed a whole command, periodt 📢

---

🦋 METHODS 🦋

Load($file, %args)

loads $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). the math is mathing 📐

AddQuitBindings

convenience method to add the bindinds Key-q and Control-Key-q to close the Toplevel window containing this More widget. (yes, "bindinds" — that's the original spelling, we don't touch the lore 🙈) bye bye window 👋

---

💀 BUGS 💀

besides that, most of the more bindings are not implemented. and honestly? it bugs the author most. here's the list, 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)

not me listing the bugs with the same energy as a ranked tier list 😭

---

⭐ SEE ALSO ⭐

Tk::ROText, more(1), tkmore, less(1) — go read those too, bestie, iykyk 📚

---

👑 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. 📜

---

and that's a wrap bestie!! this page shipped with perl v5.34.0 and got its lil timestamp on 2022-06-28 🌸💖 slay, go forth and scroll 💅✨