Hi [EMAIL PROTECTED]:

when you do an 'open, you don't get a file!, but a port.
so change your func this way:

fprint: func [fp[port!] value[string!]] [
  either not-equal? fp none   [
      ; thou canst write on a port, just append ...
      append fp value
      append fp newline
  ] [ 
      print value 
  ]
]


regards,

Ingo

--  _     .                                _
ingo@)|_ /|  _| _  <We ARE all ONE   www._|_o _   _ ._ _  
www./_|_) |o(_|(/_  We ARE all FREE> ingo@| |(_|o(_)| (_| 
http://www.2b1.de/Rebol/                     ._|      ._|

Reply via email to