comparison lisp/hm--html-menus/hm--html-keys.el @ 46:6a22abad6937 r19-15

Import from CVS: tag r19-15
author cvs
date Mon, 13 Aug 2007 08:55:31 +0200
parents 441bb1e64a06
children 131b0175ea99
comparison
equal deleted inserted replaced
45:7705b7aa3b8a 46:6a22abad6937
1 ;;; $Id: hm--html-keys.el,v 1.4 1997/03/02 03:43:16 steve Exp $ 1 ;;; $Id: hm--html-keys.el,v 1.5 1997/03/26 22:42:37 steve Exp $
2 ;;; 2 ;;;
3 ;;; Copyright (C) 1995, 1996, 1997 Heiko Muenkel 3 ;;; Copyright (C) 1995, 1996, 1997 Heiko Muenkel
4 ;;; email: muenkel@tnt.uni-hannover.de 4 ;;; email: muenkel@tnt.uni-hannover.de
5 ;;; 5 ;;;
6 ;;; This program is free software; you can redistribute it and/or modify 6 ;;; This program is free software; you can redistribute it and/or modify
54 (define-key hm--html-noregion-anchor-map "i" 'hm--html-add-info-link) 54 (define-key hm--html-noregion-anchor-map "i" 'hm--html-add-info-link)
55 (define-key hm--html-noregion-anchor-map "g" 'hm--html-add-gopher-link) 55 (define-key hm--html-noregion-anchor-map "g" 'hm--html-add-gopher-link)
56 (define-key hm--html-noregion-anchor-map "f" 'hm--html-add-file-link) 56 (define-key hm--html-noregion-anchor-map "f" 'hm--html-add-file-link)
57 (define-key hm--html-noregion-anchor-map "\C-f" 'hm--html-add-ftp-link) 57 (define-key hm--html-noregion-anchor-map "\C-f" 'hm--html-add-ftp-link)
58 (define-key hm--html-noregion-anchor-map "n" 'hm--html-add-news-link) 58 (define-key hm--html-noregion-anchor-map "n" 'hm--html-add-news-link)
59 (define-key hm--html-noregion-anchor-map "m" 'hm--html-add-mail-link) 59 (define-key hm--html-noregion-anchor-map "m" 'hm--html-add-mail-box-link)
60 (define-key hm--html-noregion-anchor-map 60 (define-key hm--html-noregion-anchor-map
61 [(control m)] 'hm--html-add-mailto-link) 61 [(control m)] 'hm--html-add-mailto-link)
62 (define-key hm--html-noregion-anchor-map "w" 'hm--html-add-direct-wais-link) 62 (define-key hm--html-noregion-anchor-map "w" 'hm--html-add-direct-wais-link)
63 (define-key hm--html-noregion-anchor-map "\C-w" 'hm--html-add-wais-link) 63 (define-key hm--html-noregion-anchor-map "\C-w" 'hm--html-add-wais-link)
64 (define-key hm--html-noregion-anchor-map "p" 'hm--html-add-proggate-link) 64 (define-key hm--html-noregion-anchor-map "p" 'hm--html-add-proggate-link)
82 "g" 'hm--html-add-gopher-link-to-region) 82 "g" 'hm--html-add-gopher-link-to-region)
83 (define-key hm--html-region-anchor-map "f" 'hm--html-add-file-link-to-region) 83 (define-key hm--html-region-anchor-map "f" 'hm--html-add-file-link-to-region)
84 (define-key hm--html-region-anchor-map 84 (define-key hm--html-region-anchor-map
85 "\C-f" 'hm--html-add-ftp-link-to-region) 85 "\C-f" 'hm--html-add-ftp-link-to-region)
86 (define-key hm--html-region-anchor-map "n" 'hm--html-add-news-link-to-region) 86 (define-key hm--html-region-anchor-map "n" 'hm--html-add-news-link-to-region)
87 (define-key hm--html-region-anchor-map "m" 'hm--html-add-mail-link-to-region) 87 (define-key hm--html-region-anchor-map "m" 'hm--html-add-mail-box-link-to-region)
88 (define-key hm--html-region-anchor-map 88 (define-key hm--html-region-anchor-map
89 [(control m)] 'hm--html-add-mailto-link-to-region) 89 [(control m)] 'hm--html-add-mailto-link-to-region)
90 (define-key hm--html-region-anchor-map 90 (define-key hm--html-region-anchor-map
91 "w" 'hm--html-add-direct-wais-link-to-region) 91 "w" 'hm--html-add-direct-wais-link-to-region)
92 (define-key hm--html-region-anchor-map 92 (define-key hm--html-region-anchor-map
227 (define-key hm--html-noregion-formating-paragraph-map 227 (define-key hm--html-noregion-formating-paragraph-map
228 "p" 'hm--html-add-preformated) 228 "p" 'hm--html-add-preformated)
229 (define-key hm--html-noregion-formating-paragraph-map 229 (define-key hm--html-noregion-formating-paragraph-map
230 "b" 'hm--html-add-blockquote) 230 "b" 'hm--html-add-blockquote)
231 (define-key hm--html-noregion-formating-paragraph-map 231 (define-key hm--html-noregion-formating-paragraph-map
232 "C-b" 'hm--html-add-basefont) 232 "\C-b" 'hm--html-add-basefont)
233 (define-key hm--html-noregion-formating-paragraph-map 233 (define-key hm--html-noregion-formating-paragraph-map
234 "f" 'hm--html-add-font) 234 "f" 'hm--html-add-font)
235 (define-key hm--html-noregion-formating-paragraph-map 235 (define-key hm--html-noregion-formating-paragraph-map
236 "c" 'hm--html-add-center) 236 "c" 'hm--html-add-center)
237 (define-key hm--html-noregion-formating-paragraph-map 237 (define-key hm--html-noregion-formating-paragraph-map
238 "C-c" 'hm--html-add-comment-to-region) 238 "\C-c" 'hm--html-add-comment)
239 ; (define-key hm--html-noregion-formating-paragraph-map 239 ; (define-key hm--html-noregion-formating-paragraph-map
240 ; "l" 'hm--html-add-listing) 240 ; "l" 'hm--html-add-listing)
241 ; (define-key hm--html-noregion-formating-paragraph-map 241 ; (define-key hm--html-noregion-formating-paragraph-map
242 ; "a" 'hm--html-add-abstract) 242 ; "a" 'hm--html-add-abstract)
243 ) 243 )
253 (define-key hm--html-region-formating-paragraph-map 253 (define-key hm--html-region-formating-paragraph-map
254 "p" 'hm--html-add-preformated-to-region) 254 "p" 'hm--html-add-preformated-to-region)
255 (define-key hm--html-region-formating-paragraph-map 255 (define-key hm--html-region-formating-paragraph-map
256 "b" 'hm--html-add-blockquote-to-region) 256 "b" 'hm--html-add-blockquote-to-region)
257 (define-key hm--html-region-formating-paragraph-map 257 (define-key hm--html-region-formating-paragraph-map
258 "C-b" 'hm--html-add-basefont-to-region) 258 "\C-b" 'hm--html-add-basefont-to-region)
259 (define-key hm--html-region-formating-paragraph-map 259 (define-key hm--html-region-formating-paragraph-map
260 "f" 'hm--html-add-font-to-region) 260 "f" 'hm--html-add-font-to-region)
261 (define-key hm--html-region-formating-paragraph-map 261 (define-key hm--html-region-formating-paragraph-map
262 "c" 'hm--html-add-center-to-region) 262 "c" 'hm--html-add-center-to-region)
263 (define-key hm--html-region-formating-paragraph-map 263 (define-key hm--html-region-formating-paragraph-map
264 "C-c" 'hm--html-add-comment-to-region) 264 "\C-c" 'hm--html-add-comment-to-region)
265 ; (define-key hm--html-region-formating-paragraph-map 265 ; (define-key hm--html-region-formating-paragraph-map
266 ; "l" 'hm--html-add-listing-to-region) 266 ; "l" 'hm--html-add-listing-to-region)
267 ; (define-key hm--html-region-formating-paragraph-map 267 ; (define-key hm--html-region-formating-paragraph-map
268 ; "a" 'hm--html-add-abstract-to-region) 268 ; "a" 'hm--html-add-abstract-to-region)
269 ) 269 )