projects
/
chise
/
xemacs-chise.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(JX2-234A): Relate to U-000208B9.
[chise/xemacs-chise.git-]
/
lisp
/
msw-select.el
diff --git
a/lisp/msw-select.el
b/lisp/msw-select.el
index
de454df
..
ff659f9
100644
(file)
--- a/
lisp/msw-select.el
+++ b/
lisp/msw-select.el
@@
-38,7
+38,7
@@
replacing the active selection if there is one."
(interactive "*")
(setq last-command nil)
(setq this-command 'yank) ; so that yank-pop works.
(interactive "*")
(setq last-command nil)
(setq this-command 'yank) ; so that yank-pop works.
- (let ((clip (mswindows-get-clipboard)) (s (mark-marker)) (e (point-marker)))
+ (let ((clip (get-clipboard)) (s (mark-marker)) (e (point-marker)))
(or clip (error "there is no text on the clipboard"))
(if s
(if mouse-track-rectangle-p
(or clip (error "there is no text on the clipboard"))
(if s
(if mouse-track-rectangle-p