SHA256
1
0
forked from pool/xemacs

Accepting request 130343 from home:ailin_nemui:branches:M17N:back

I see, please have a look at this then

OBS-URL: https://build.opensuse.org/request/show/130343
OBS-URL: https://build.opensuse.org/package/show/M17N/xemacs?expand=0&rev=54
This commit is contained in:
2012-08-08 01:28:16 +00:00
committed by Git OBS Bridge
parent 84a8757fe0
commit c904c531e6
7 changed files with 43 additions and 35 deletions

View File

@@ -268,18 +268,18 @@ Index: xemacs-21.5.29/lisp/x-win-xfree86.el
===================================================================
--- xemacs-21.5.29.orig/lisp/x-win-xfree86.el
+++ xemacs-21.5.29/lisp/x-win-xfree86.el
@@ -101,6 +101,10 @@
@@ -99,6 +99,11 @@
;; define also the control, meta, and meta-control versions.
(loop for mods in '(() (control) (meta) (meta control)) do
(define-key function-key-map `[(,@mods ,key)] `[(shift ,@mods ,sane-key)])
- ))))
-
+ )))
(define-key function-key-map `[(,@mods ,key)]
- `[(shift ,@mods ,sane-key)])))))
+ `[(shift ,@mods ,sane-key)]))))
+;; Begin insert
+;; <werner@suse.de> set Symbol delete == [delete] to delete-char
+ (load "term/func-keys" t t)
+;; End insert
+)
;;; x-win-xfree86.el ends here
Index: xemacs-21.5.29/site-packages/lisp/term/func-keys.el
===================================================================