[PATCH (pkgs)] tcl.el comint function binding test

The original code isn't necessarily broken; this just seems safer. xemacs-packages/prog-modes/ChangeLog addition: 2006-05-13 Jerry James <james(a)xemacs.org&gt; * tcl.el (tcl-filter): Predicate use of comint-output-filter on a function binding instead of on a version number. packages source patch: Diff command: cvs -q diff -uN Files affected: xemacs-packages/prog-modes/tcl.el Index: xemacs-packages/prog-modes/tcl.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/prog-modes/tcl.el,v retrieving revision 1.10 diff -d -u -r1.10 tcl.el --- xemacs-packages/prog-modes/tcl.el 2003/01/06 18:31:23 1.10 +++ xemacs-packages/prog-modes/tcl.el 2006/05/13 22:27:33 ＠＠ -1282,7 +1282,7 ＠＠ (progn (delete-region (point) inferior-tcl-delete-prompt-marker) (set-marker inferior-tcl-delete-prompt-marker nil))))) - (if tcl-using-emacs-19 + (if (fboundp 'comint-output-filter) (comint-output-filter proc string) (funcall comint-output-filter string))) -- Jerry James, Assistant Professor james(a)xemacs.org Computer Science Department http://www.cs.usu.edu/~jerry/ Utah State University