projects
/
mit-scheme.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
639d130
)
gtk-screen: Remove string->utf8 from os/interprogram-cut.
author
Matt Birkholz
<puck@birchwood-abbey.net>
Sun, 5 Feb 2017 03:31:07 +0000
(20:31 -0700)
committer
Matt Birkholz
<puck@birchwood-abbey.net>
Sun, 5 Feb 2017 03:45:46 +0000
(20:45 -0700)
src/gtk-screen/gtk-screen.scm
patch
|
blob
|
history
diff --git
a/src/gtk-screen/gtk-screen.scm
b/src/gtk-screen/gtk-screen.scm
index 6dbd48ded25f26ab804c0bc63f98eb62209da2a5..415fb245e749c5c7ddf3ee10372f101a74fdc156 100644
(file)
--- a/
src/gtk-screen/gtk-screen.scm
+++ b/
src/gtk-screen/gtk-screen.scm
@@
-706,7
+706,7
@@
Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
(named-lambda (os/interprogram-cut string point)
(declare (ignore point))
(gtk-window-set-clipboard-text (gtk-screen-toplevel (selected-screen))
-
(string->utf8 string)
)))
+
string
)))
(set!
os/interprogram-paste