Mercurial > emacs
annotate lispintro/mkinstalldirs @ 83319:8f5787c83345
Change key-translation-map to be terminal-local.
* src/keymap.c (Vkey_translation_map): Remove.
(syms_of_keymap): Remove DEFVAR for key-translation-map.
(Fdescribe_buffer_bindings): Update for terminal-local key-translation-map.
* src/keyboard.h (kboard): Add Vkey_translation_map field.
(Vglobal_key_translation_map): Declare.
* src/keyboard.c (Vglobal_key_translation_map): New variable.
(syms_of_keyboard): DEFVAR it and Vkey_translation_map.
(mark_kboards): Mark key-translation-map.
(read_key_sequence): Update for terminal-local key-translation-map.
* src/emacs.c (main): Call syms_of_keymap before syms_of_keyboard.
* lisp/term/mac-win.el (mac-handle-language-change): Use
global-key-translation-map instead of key-translation-map.
* lisp/obsolete/iso-acc.el (iso-accents-customize): Ditto.
* lisp/international/iso-transl.el (iso-transl-ctl-x-8-map): Ditto.
* lisp/double.el (double-setup): Ditto.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-359
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Sun, 26 Jun 2005 21:06:46 +0000 |
parents | eb7e8d483840 |
children |
rev | line source |
---|---|
41418 | 1 #! /bin/sh |
2 # mkinstalldirs --- make directory hierarchy | |
3 # Author: Noah Friedman <friedman@prep.ai.mit.edu> | |
4 # Created: 1993-05-16 | |
5 # Public domain | |
6 | |
7 errstatus=0 | |
8 | |
9 for file | |
10 do | |
11 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` | |
12 shift | |
13 | |
14 pathcomp= | |
15 for d | |
16 do | |
17 pathcomp="$pathcomp$d" | |
18 case "$pathcomp" in | |
19 -* ) pathcomp=./$pathcomp ;; | |
20 esac | |
21 | |
22 if test ! -d "$pathcomp"; then | |
23 echo "mkdir $pathcomp" 1>&2 | |
24 | |
25 mkdir "$pathcomp" || lasterr=$? | |
26 | |
27 if test ! -d "$pathcomp"; then | |
28 errstatus=$lasterr | |
29 fi | |
30 fi | |
31 | |
32 pathcomp="$pathcomp/" | |
33 done | |
34 done | |
35 | |
36 exit $errstatus | |
37 | |
38 # mkinstalldirs ends here |