Re: problems with Xemacs 21.5.16 in Mac OS X "Panther"
On Thu, 1 Jan 2004 about 02:33 +0100 UTC Artemio Gonzalez Lopez wrote:
I have successfully compiled Xemacs-21.5.16 for Mac OS X 10.3.2
(Panther), and installed
the xemacs sumo package. Everything seems to work OK, except for two
apparent bugs:
1) By default, "Active regions" is on (in the Options-> Editing menu).
However, when I double click on a
word or select text with the cursor Xemacs beeps, and the following
cryptic message appears
in the status bar:
Symbol's value as variable is void: region
2) More annoyingly, when I select text (after turning "Active regions"
off, otherwise I get error 1)
and press the Delete key only the character next to the cursor is
deleted, not the entire selection. This is so even when "Ovestrike" is
selected in the Options-> Editing menu.
I have a similar setup (OS X 10.3.2, latest 21.5.b16 cvs). My regions
delete without error. I seem to recall there was a CVS a while back where
I saw this error. I keep Active Regions on and include these in my startup
file:
;;package xemacs-packages/lisp/pc must be installed for pending-del.el
(require 'pending-del)
;; These I carried over from my windows XEmacs to mimic its cut/paste
;; delete key can delete the entire region or cut it.
(defun win-delete (&optional killp)
(interactive "P")
(if (and (region-active-p)
(if zmacs-region-rectangular-p
(eq (extent-object (car zmacs-region-extent))
(current-buffer))
(eq (extent-object zmacs-region-extent) (current-buffer)))
(not buffer-read-only)
)
(if zmacs-region-rectangular-p
(if killp
(kill-rectangle (region-beginning) (region-end))
(delete-rectangle (region-beginning) (region-end)))
(if killp
(kill-region (region-beginning) (region-end))
(delete-region (region-beginning) (region-end))))
(zmacs-deactivate-region)
;; else
(if killp
(delete-char killp (or killp nil))
(delete-char 1)
)
)
)
;; yank over highlighted text deletes region and yanks kill buffer into
;; its place.
(defun win-yank ()
(interactive)
(if (and (not buffer-read-only)
(region-active-p))
(win-delete) t)
(yank)
)
(custom-set-variables
'(global-popup-menu '(["%_Cut Region" toolbar-cut :active
(region-exists-p)
] ["%_Copy Region" toolbar-copy :active
(region-exists-p)
] ["%_Paste Region" toolbar-paste :active kill-ring-yank-pointer])
t))
Maybe some of this (along with the latest CVS) will help you.
--
rdr