#!/usr/local/bin/klone
; reverses the order of lines. filter.

(setq lines (list))
(catch 'EOF
  (while (setq line (read-line))
    (insert lines 0 line)
))

(dolist (line lines)
  (write-line line)
)
