x11: Remove reference to deprecated char->string.

diff --git a/src/x11/x11-base.scm b/src/x11/x11-base.scm
index 884c1f0bdb36ff2b12515157b0b4fbe482151413..c7af38ed3de572519f872d385d02909b4d952bba 100644 (file)
--- a/src/x11/x11-base.scm
+++ b/src/x11/x11-base.scm
@@ -280,7 +280,7 @@ Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
                                             (= nbytes 1)
                                             (= (C-> buffer "char")
                                                (char->integer #\backspace)))
-                                       (char->string #\Delete))
+                                       "\177")
                                       ((> nbytes 0)
                                        (let ((bv (make-bytevector nbytes)))
                                          (c-peek-bytes buffer 0 nbytes bv 0)