Rebol Programming/more

= USAGE: = MORE 'file

= DESCRIPTION: = Print file (shell shortcut function).

MORE is a function value. = ARGUMENTS: =
 * file -- Accepts %file, :variables and just words (as file names) (Type: file word path string paren)

= (SPECIAL ATTRIBUTES) =
 * catch

= SOURCE CODE = more: func [ "Print file (shell shortcut function)." [catch] 'file [file! word! path! string! paren!] {Accepts %file, :variables and just words (as file names)} ][   if paren? :file [set/any 'file do :file] print read switch/default type?/word get/any 'file [ file! [file] string! [to-rebol-file file] word! path! [to-file file] ] [throw-error 'script 'expect-arg reduce ['more 'file type? get/any 'file]] ]