ps-print.el fix?

i'm using xemacs 21.2.43. in my .xemacs/init.el i have the following... (defun truncate() (interactive)(setq truncate-lines t)) which seems to collide with the following code from ps-print.el... (defun ps-find-wrappoint (from to char-width) (let ((avail (truncate (/ ps-width-remaining char-width))) (todo (- to from))) (if (< todo avail) (cons to (* todo char-width)) (cons (+ from avail) ps-width-remaining)))) could the "avail (truncate" line in ps-print.el be improved by calling it "avail (sys-truncate" or some such other "system namespace" prefix? or is there some way for my init.el to be improved to not collide. please cc me as i'm not subscribed to this list. thanks, jr -- ------------------------------------------------------------------------ Joel W. Reed 412-257-3881 --------------All the simple programs have been written.----------------