>>>> rn Torkelsson writes:
rn> Andreas Jaeger <aj(a)suse.de> writes:
> > Can you please make a new upload of pcl-cvs to?
> > The current package barfs when used on a non-mule XEmacs. See the
> > thread:
>
> >
http://www.xemacs.org/list-archives/xemacs-beta/200006/msg00249.html
>
> > /torkel
>
> Ok, I've installed a new XEmacs with a patched cl-macs.el version and
> rebuild pcl-cvs. I'll upload it soon, please check it yourself.
rn> Still requires mule :-(
rn> ;;; compiled by aj(a)gromit.rhein-neckar.de on Mon Jul 10 17:59:19 2000
rn> ;;; from file /usr/src/cvs/xemacs-packages/prog/pcl-cvs/cvs-status.el
rn> ;;; emacs version 21.1 (patch 10) "Capitol Reef" XEmacs Lucid.
rn> ;;; bytecomp version 2.25 XEmacs; 22-Mar-96.
rn> ;;; optimization is on.
rn> ;;; this file uses opcodes which do not exist in Emacs 19.
rn> (if (and (boundp 'emacs-version)
rn> (or (and (boundp 'epoch::version) epoch::version)
rn> (string-lessp emacs-version "20")))
rn> (error "`cvs-status.el' was compiled for Emacs 20"))
rn> (or (boundp 'current-load-list) (setq current-load-list nil))
rn> (require 'mule)
Have a look at cvs-status.el:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
;; chars sets. Ripped from cvstree
(defvar cvstree-dstr-2byte-ready
(when (featurep 'mule)
(if (boundp 'current-language-environment)
(string= current-language-environment "Japanese")
t)) ; mule/emacs-19
"*Variable that specifies characters set used in cvstree tree graph.
If non-nil, 2byte (Japanese?) characters set is used.
If nil, 1byte characters set is used.
2byte characters might be available with Mule or Emacs with Mule extension.")
(defconst cvstree-dstr-char-space
(if cvstree-dstr-2byte-ready "ESC$B!!ESC(B" " "))
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
There's nothing I can do to satisfy Mule and Non-Mule users. Or do
you know about any solution?
Andreas
--
Andreas Jaeger
SuSE Labs aj(a)suse.de
private aj(a)arthur.inka.de