675 (setq show-paren-style (quote parenthesis)) |
675 (setq show-paren-style (quote parenthesis)) |
676 |
676 |
677 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
677 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
678 (message "keyboard, mouse") |
678 (message "keyboard, mouse") |
679 |
679 |
|
680 ;; (pc-bindings-mode) ; I define own keybinding... |
|
681 |
680 ;; cyrillic-jis-russian for 567 is :,. |
682 ;; cyrillic-jis-russian for 567 is :,. |
681 ;; cyrillic-jcuken for SHIFT 567 is :,. |
683 ;; cyrillic-jcuken for SHIFT 567 is :,. |
682 ;; russian-computer for SHIFT 567 is %^& |
684 ;; russian-computer for SHIFT 567 is %^& |
683 (if (>= emacs-major-version 22) |
685 (setq my-russian-input-method 'russian-computer) |
684 (setq default-input-method 'russian-computer) |
686 (setq my-ukranian-input-method 'ukranian-computer) |
685 (setq default-input-method 'cyrillic-jcuken)) |
687 (when (<= emacs-major-version 21) |
686 ;; (pc-bindings-mode) ; Myself define keybinding, see |
688 (setq my-russian-input-method 'cyrillic-jcuken) |
|
689 (setq my-ukranian-input-method 'cyrillic-jcuken)) |
|
690 (setq default-input-method my-russian-input-method) |
687 |
691 |
688 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
692 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
689 (message "mouse") |
693 (message "mouse") |
690 |
694 |
691 ;; Scroll Bar gets dragged by mouse butn 1 |
695 ;; Scroll Bar gets dragged by mouse butn 1 |