Mercurial > emacs
changeset 23189:ac0f6ede7b66
Use `string' before calling `insert'
so that in multibyte buffers we insert multibyte chars.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Fri, 04 Sep 1998 20:46:30 +0000 |
parents | c8b236bbecad |
children | 0fe0fe296153 |
files | lisp/international/iso-insert.el |
diffstat | 1 files changed, 96 insertions(+), 96 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/iso-insert.el Fri Sep 04 20:43:09 1998 +0000 +++ b/lisp/international/iso-insert.el Fri Sep 04 20:46:30 1998 +0000 @@ -35,482 +35,482 @@ (defun insert-no-break-space () (interactive "*") - (insert 160) + (insert (string 160)) ) (defun insert-inverted-exclamation-mark () (interactive "*") - (insert 161) + (insert (string 161)) ) (defun insert-cent-sign () (interactive "*") - (insert 162) + (insert (string 162)) ) (defun insert-pound-sign () (interactive "*") - (insert 163) + (insert (string 163)) ) (defun insert-general-currency-sign () (interactive "*") - (insert 164) + (insert (string 164)) ) (defun insert-yen-sign () (interactive "*") - (insert 165) + (insert (string 165)) ) (defun insert-broken-vertical-line () (interactive "*") - (insert 166) + (insert (string 166)) ) (defun insert-section-sign () (interactive "*") - (insert 167) + (insert (string 167)) ) (defun insert-diaeresis () (interactive "*") - (insert 168) + (insert (string 168)) ) (defun insert-copyright-sign () (interactive "*") - (insert 169) + (insert (string 169)) ) (defun insert-ordinal-indicator-feminine () (interactive "*") - (insert 170) + (insert (string 170)) ) (defun insert-angle-quotation-mark-left () (interactive "*") - (insert 171) + (insert (string 171)) ) (defun insert-not-sign () (interactive "*") - (insert 172) + (insert (string 172)) ) (defun insert-soft-hyphen () (interactive "*") - (insert 173) + (insert (string 173)) ) (defun insert-registered-sign () (interactive "*") - (insert 174) + (insert (string 174)) ) (defun insert-macron () (interactive "*") - (insert 175) + (insert (string 175)) ) (defun insert-degree-sign () (interactive "*") - (insert 176) + (insert (string 176)) ) (defun insert-plus-or-minus-sign () (interactive "*") - (insert 177) + (insert (string 177)) ) (defun insert-superscript-two () (interactive "*") - (insert 178) + (insert (string 178)) ) (defun insert-superscript-three () (interactive "*") - (insert 179) + (insert (string 179)) ) (defun insert-acute-accent () (interactive "*") - (insert 180) + (insert (string 180)) ) (defun insert-micro-sign () (interactive "*") - (insert 181) + (insert (string 181)) ) (defun insert-pilcrow () (interactive "*") - (insert 182) + (insert (string 182)) ) (defun insert-middle-dot () (interactive "*") - (insert 183) + (insert (string 183)) ) (defun insert-cedilla () (interactive "*") - (insert 184) + (insert (string 184)) ) (defun insert-superscript-one () (interactive "*") - (insert 185) + (insert (string 185)) ) (defun insert-ordinal-indicator-masculine () (interactive "*") - (insert 186) + (insert (string 186)) ) (defun insert-angle-quotation-mark-right () (interactive "*") - (insert 187) + (insert (string 187)) ) (defun insert-fraction-one-quarter () (interactive "*") - (insert 188) + (insert (string 188)) ) (defun insert-fraction-one-half () (interactive "*") - (insert 189) + (insert (string 189)) ) (defun insert-fraction-three-quarters () (interactive "*") - (insert 190) + (insert (string 190)) ) (defun insert-inverted-question-mark () (interactive "*") - (insert 191) + (insert (string 191)) ) (defun insert-A-grave () (interactive "*") - (insert 192) + (insert (string 192)) ) (defun insert-A-acute () (interactive "*") - (insert 193) + (insert (string 193)) ) (defun insert-A-circumflex () (interactive "*") - (insert 194) + (insert (string 194)) ) (defun insert-A-tilde () (interactive "*") - (insert 195) + (insert (string 195)) ) (defun insert-A-umlaut () (interactive "*") - (insert 196) + (insert (string 196)) ) (defun insert-A-ring () (interactive "*") - (insert 197) + (insert (string 197)) ) (defun insert-AE () (interactive "*") - (insert 198) + (insert (string 198)) ) (defun insert-C-cedilla () (interactive "*") - (insert 199) + (insert (string 199)) ) (defun insert-E-grave () (interactive "*") - (insert 200) + (insert (string 200)) ) (defun insert-E-acute () (interactive "*") - (insert 201) + (insert (string 201)) ) (defun insert-E-circumflex () (interactive "*") - (insert 202) + (insert (string 202)) ) (defun insert-E-umlaut () (interactive "*") - (insert 203) + (insert (string 203)) ) (defun insert-I-grave () (interactive "*") - (insert 204) + (insert (string 204)) ) (defun insert-I-acute () (interactive "*") - (insert 205) + (insert (string 205)) ) (defun insert-I-circumflex () (interactive "*") - (insert 206) + (insert (string 206)) ) (defun insert-I-umlaut () (interactive "*") - (insert 207) + (insert (string 207)) ) (defun insert-D-stroke () (interactive "*") - (insert 208) + (insert (string 208)) ) (defun insert-N-tilde () (interactive "*") - (insert 209) + (insert (string 209)) ) (defun insert-O-grave () (interactive "*") - (insert 210) + (insert (string 210)) ) (defun insert-O-acute () (interactive "*") - (insert 211) + (insert (string 211)) ) (defun insert-O-circumflex () (interactive "*") - (insert 212) + (insert (string 212)) ) (defun insert-O-tilde () (interactive "*") - (insert 213) + (insert (string 213)) ) (defun insert-O-umlaut () (interactive "*") - (insert 214) + (insert (string 214)) ) (defun insert-multiplication-sign () (interactive "*") - (insert 215) + (insert (string 215)) ) (defun insert-O-slash () (interactive "*") - (insert 216) + (insert (string 216)) ) (defun insert-U-grave () (interactive "*") - (insert 217) + (insert (string 217)) ) (defun insert-U-acute () (interactive "*") - (insert 218) + (insert (string 218)) ) (defun insert-U-circumflex () (interactive "*") - (insert 219) + (insert (string 219)) ) (defun insert-U-umlaut () (interactive "*") - (insert 220) + (insert (string 220)) ) (defun insert-Y-acute () (interactive "*") - (insert 221) + (insert (string 221)) ) (defun insert-THORN () (interactive "*") - (insert 222) + (insert (string 222)) ) (defun insert-ss () (interactive "*") - (insert 223) + (insert (string 223)) ) (defun insert-a-grave () (interactive "*") - (insert 224) + (insert (string 224)) ) (defun insert-a-acute () (interactive "*") - (insert 225) + (insert (string 225)) ) (defun insert-a-circumflex () (interactive "*") - (insert 226) + (insert (string 226)) ) (defun insert-a-tilde () (interactive "*") - (insert 227) + (insert (string 227)) ) (defun insert-a-umlaut () (interactive "*") - (insert 228) + (insert (string 228)) ) (defun insert-a-ring () (interactive "*") - (insert 229) + (insert (string 229)) ) (defun insert-ae () (interactive "*") - (insert 230) + (insert (string 230)) ) (defun insert-c-cedilla () (interactive "*") - (insert 231) + (insert (string 231)) ) (defun insert-e-grave () (interactive "*") - (insert 232) + (insert (string 232)) ) (defun insert-e-acute () (interactive "*") - (insert 233) + (insert (string 233)) ) (defun insert-e-circumflex () (interactive "*") - (insert 234) + (insert (string 234)) ) (defun insert-e-umlaut () (interactive "*") - (insert 235) + (insert (string 235)) ) (defun insert-i-grave () (interactive "*") - (insert 236) + (insert (string 236)) ) (defun insert-i-acute () (interactive "*") - (insert 237) + (insert (string 237)) ) (defun insert-i-circumflex () (interactive "*") - (insert 238) + (insert (string 238)) ) (defun insert-i-umlaut () (interactive "*") - (insert 239) + (insert (string 239)) ) (defun insert-d-stroke () (interactive "*") - (insert 240) + (insert (string 240)) ) (defun insert-n-tilde () (interactive "*") - (insert 241) + (insert (string 241)) ) (defun insert-o-grave () (interactive "*") - (insert 242) + (insert (string 242)) ) (defun insert-o-acute () (interactive "*") - (insert 243) + (insert (string 243)) ) (defun insert-o-circumflex () (interactive "*") - (insert 244) + (insert (string 244)) ) (defun insert-o-tilde () (interactive "*") - (insert 245) + (insert (string 245)) ) (defun insert-o-umlaut () (interactive "*") - (insert 246) + (insert (string 246)) ) (defun insert-division-sign () (interactive "*") - (insert 247) + (insert (string 247)) ) (defun insert-o-slash () (interactive "*") - (insert 248) + (insert (string 248)) ) (defun insert-u-grave () (interactive "*") - (insert 249) + (insert (string 249)) ) (defun insert-u-acute () (interactive "*") - (insert 250) + (insert (string 250)) ) (defun insert-u-circumflex () (interactive "*") - (insert 251) + (insert (string 251)) ) (defun insert-u-umlaut () (interactive "*") - (insert 252) + (insert (string 252)) ) (defun insert-y-acute () (interactive "*") - (insert 253) + (insert (string 253)) ) (defun insert-thorn () (interactive "*") - (insert 254) + (insert (string 254)) ) (defun insert-y-umlaut () (interactive "*") - (insert 255) + (insert (string 255)) ) (defvar 8859-1-map nil "Keymap for ISO 8859/1 character insertion.")