Index: cvs-status.el =================================================================== RCS file: /usr/CVSroot/XEmacs/xemacs-packages/prog/pcl-cvs/cvs-status.el,v retrieving revision 2.1 diff -u -r2.1 cvs-status.el --- cvs-status.el 2000/04/21 09:58:16 2.1 +++ cvs-status.el 2000/07/11 08:47:12 @@ -411,17 +411,29 @@ 2byte characters might be available with Mule or Emacs with Mule extension.") (defconst cvstree-dstr-char-space - (if cvstree-dstr-2byte-ready " " " ")) + (if cvstree-dstr-2byte-ready + (make-char 'japanese-jisx0208 33 33) + ?\ )) (defconst cvstree-dstr-char-hbar - (if cvstree-dstr-2byte-ready "━" "-")) + (if cvstree-dstr-2byte-ready + (make-char 'japanese-jisx0208 40 44) + ?-)) (defconst cvstree-dstr-char-vbar - (if cvstree-dstr-2byte-ready "┃" "|")) + (if cvstree-dstr-2byte-ready + (make-char 'japanese-jisx0208 40 45) + ?|)) (defconst cvstree-dstr-char-branch - (if cvstree-dstr-2byte-ready "┣" "+")) + (if cvstree-dstr-2byte-ready + (make-char 'japanese-jisx0208 40 50) + ?+)) (defconst cvstree-dstr-char-eob ;end of branch - (if cvstree-dstr-2byte-ready "┗" "`")) + (if cvstree-dstr-2byte-ready + (make-char 'japanese-jisx0208 40 49) + ?`)) (defconst cvstree-dstr-char-bob ;beginning of branch - (if cvstree-dstr-2byte-ready "┳" "+")) + (if cvstree-dstr-2byte-ready + (make-char 'japanese-jisx0208 40 51) + ?+)) (defun cvs-tag-lessp (tag1 tag2) (eq (cvs-tag-compare tag1 tag2) 'more2))