# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1127151865 0
# Node ID e1327485f0738e415e6106da36d7df223980a725
# Parent  eae4a82ba77aa7dfa08f383bd89ec2de4ad5845f
(terminal-init-rxvt): Add entry for [end].

diff -r eae4a82ba77a -r e1327485f073 lisp/term/rxvt.el
--- a/lisp/term/rxvt.el	Mon Sep 19 17:41:22 2005 +0000
+++ b/lisp/term/rxvt.el	Mon Sep 19 17:44:25 2005 +0000
@@ -33,7 +33,7 @@
   ;; a PC-style keyboard these keys correspond to
   ;; MODIFIER-FUNCTION_KEY, where modifier is S-, C-, C-S-.  The
   ;; code here subsitutes the corresponding defintions in
-  ;; function-key-map. This substitution is needed because if a key
+  ;; function-key-map.  This substitution is needed because if a key
   ;; definition if found in function-key-map, there are no further
   ;; lookups in other keymaps.
   (substitute-key-definition [f11] [S-f1] function-key-map)
@@ -75,12 +75,13 @@
     (define-key map "\e[B" [down])
     (define-key map "\e[C" [right])
     (define-key map "\e[D" [left])
-    (define-key map "\e[7~" [home])
     (define-key map "\e[2~" [insert])
     (define-key map "\e[3~" [delete])
     (define-key map "\e[4~" [select])
     (define-key map "\e[5~" [prior])
     (define-key map "\e[6~" [next])
+    (define-key map "\e[7~" [home])
+    (define-key map "\e[8~" [end])
     (define-key map "\e[11~" [f1])
     (define-key map "\e[12~" [f2])
     (define-key map "\e[13~" [f3])
@@ -236,5 +237,5 @@
 	  (setq default-frame-background-mode 'dark)))
     (frame-set-background-mode (selected-frame))))
 
-;;; arch-tag: 20cf2fb6-6318-4bab-9dbf-1d15048f2257
+;; arch-tag: 20cf2fb6-6318-4bab-9dbf-1d15048f2257
 ;;; rxvt.el ends here