variable line-display pager?

[Chip Camden]

Quoth Gary Kline on Sunday, 20 February 2011:
<snip>
> 
> 	Yes, this is much nicer that the more -15 that  messes up the
> 	text with it's [MORE...] white within black.  But here you can't
> 	just tap the spacebar; is there a way around that <cr> and
> 	turning it into a space...?
> 
> 	Also, can you insert 
> 
> 	"^+++"
> 
> 	text
> 
> 	"^+++"
> 
> 	top And bottom?  Pretty sure that the user would have the large
> 	font to read aloug with that espeak read to hijm.  Having the
> 	top/bottom delimiters might make scanning the text easier.  
> 
> 	(It messed up with more.
> 
> 	Anyway, thanks foe something that actually works, :_)
> 
> 	gary
> 
> 
> 
> 
> -- 
>  Gary Kline  kline at thought.org  http://www.thought.org  Public Service Unix
>            Journey Toward the Dawn, E-Book: http://www.thought.org
>           The 7.98a release of Jottings: http://jottings.thought.org
> 
Better?


#!/usr/bin/env ruby
require 'optparse'

pagesize = 15

optparse = OptionParser.new do |opts|
  opts.banner = 'usage: npg [-n pagesize] file...'

  opts.on('-n', '--numlines pagesize', 'Specify page size in number of lines') do |n|
    pagesize = n.to_i
  end

end

begin
  optparse.parse!
rescue OptionParser::InvalidOption, OptionParser::MissingArgument => e
  puts e
  puts optparse
  exit 1
end

puts "^+++"
loop do
  pagesize.times do
    if line = gets
      puts line
    else
      puts "^+++"
      exit
    end
  end
  print "More..."
  system "stty raw"
  STDIN.getc
  system "stty -raw"
end

-- 
Sterling (Chip) Camden | sterling at camdensoftware.com | 2048D/3A978E4F
http://chipsquips.com  | http://camdensoftware.com   | http://chipstips.com
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 488 bytes
Desc: not available
Url : http://lists.freebsd.org/pipermail/freebsd-questions/attachments/20110220/a9ca2698/attachment.pgp