2015-01 / 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31

2015-01-04 (日)

OSXのEmacsにインラインパッチなんていらなかったんや... [Emacs][OSX]

今更ながら年末のEmacs Advent Calendarを読んでいたら、
Emacs Lispの汎変数(とその他) - Qiita」にさらりとmac-auto-ascii-modeの紹介が。

また、新機能 mac-auto-ascii-mode を有効にすると、ミニバッファにカーソルを移動する際、自動的に英語モードになります。これで日本語入力モードでうっかり M-x shell と入力しようとして M-x しぇっl になるような悲惨な事故をなくすことができます。



2014-11-21のemacs-develでアナウンスされていました。

*** New global minor mode `mac-auto-ascii-mode' for Mac OS X 10.5 and
later. If enabled, it automatically selects the most-recently-used
ASCII-capable keyboard input source on some occasions: after prefix
key (bound in the global keymap) press such as C-x and M-g, and at the
start of minibuffer input.
Note: Strictly speaking, its implementation has a timing issue: the
Lisp event queue may already have some input events that have been
processed by some previous keyboard input source but yet to be
processed by the Lisp interpreter.


[2014-10-25-1]を書いた時はemacs-24.4-mac-5.0.tar.gzだったので、当
時ビルドした方はリビルドが必要です。[2014-10-25-1]の手順は5.2にアッ
プデート済みです。

以下を設定するだけです。

(mac-auto-ascii-mode 1)



IMEの入力モードを変えることなく、M-x出来ているのが分かるかと思います。
少し分かりづらいかな?
mac-auto-ascii-mode

残念なのが、ミニバッファから戻ると入力モードがUS固定になること。
mac-input-source()とminibuffer-exit-hookあたりで出来るかと思いまし
たが、うまくいきませんでした。

同じ記事にあった、入力モードに応じたカーソルの色変更の設定も自分好
みに変えつつ追加。

(defun mac-selected-keyboard-input-source-change-hook-func ()
  ;; 入力モードが英語の時はカーソルの色をfirebrickに、日本語の時はblackにする
  (set-cursor-color (if (string-match "\\.US$" (mac-input-source))
			"firebrick" "black")))

(add-hook 'mac-selected-keyboard-input-source-change-hook
	  'mac-selected-keyboard-input-source-change-hook-func)



hook名が間違っていたので、編集リクエストを送信済みです。
(誤) selected-keyboard-input-source-change-hook
(正) mac-selected-keyboard-input-source-change-hook

P.S.
このためだけにemacs-develを購読するのもなあ。。

追記(2015-05-24):
mac-auto-ascii-modeを有効にすると、C-uが変になることが分かったので
私は設定を削除しました。C-u C-cやC-u C-xすると、C-cやC-xに変わって
しまう(ミニバッファから分かる)。

追記(2016-11-24):
emacs-mac-6.1 パッチでは直っているので、今は mac-auto-ascii-mode
を有効にしています。

2015-01 / 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31

最終更新時間: 2017-01-14 05:25

検索


最近の話題
- 2017-01-10
  完全に闇に落ちていた StartSSL に ¥3,603 課金してしまったお話
- 2017-01-03
  Software Design を 13 ヶ月分まとめ読みした
- 2016-12-19
  任意の Ruby オブジェクトを YAML として書く
  Ruby の $ERROR_INFO などの特殊変数は require 'English' が必要だったのか
- 2016-12-14
  不惑の年に風呂の良さを知った
- 2016-12-10
  bundle install で Your Gemfile.lock is corrupt. と怒られる件
- 2016-11-05
  yaml_vault が AWS での Rails 環境変数つらい問題を解決したと思う
- 2016-11-01
  ZenPad 3S 10 (Z500M) から始まる廃人生活
最近追記された記事
- 2015-06-07-1 (17日前)
- 2016-12-10-1 (35日前)
- 2016-11-05-1 (43日前)
- 2015-01-04-1 (51日前)
- 2016-11-01-1 (72日前)
- 2015-07-28-1 (96日前)
- 2016-09-29-1 (98日前)
- 2014-09-23-1 (179日前)
- 2016-06-07-1 (220日前)
- 2015-12-27-1 (380日前)
カテゴリ
- Anthy (3)
- Apache (11)
- Apple (1)
- ATOK (4)
- au (2)
- AWS (15)
- Bazaar (1)
- Berkshelf (2)
- BigQuery (1)
- BitBar (3)
- Book (85)
- Boxen (2)
- Bugsnag (1)
- C (26)
- capistrano (3)
- chalow (56)
- ChatWork (1)
- Chef (17)
- Chrome (3)
- Chromecast (1)
- CircleCI (7)
- Comics (2)
- Cooking (10)
- cvs (15)
- cygwin (12)
- D3.js (1)
- Debian (55)
- Docker (1)
- E-mail (8)
- elasticsearch (3)
- Emacs (219)
- Emacs講座 (10)
- English (4)
- feedforce (7)
- fetchmail (3)
- Firefox (20)
- Fluentd (4)
- ftp (1)
- Game (19)
- Gem (5)
- Git (8)
- GitHub (15)
- Go (5)
- Google (1)
- gpg (4)
- GrowthForecast (7)
- Health (2)
- Heroku (9)
- Homebrew (10)
- HTML (6)
- iBook (1)
- iPhone (14)
- IRC (1)
- Jenkins (8)
- Karabiner (1)
- KeySnail (3)
- Kibana (1)
- Kindle (1)
- Langrich (7)
- LDAP (6)
- Life (18)
- Linux (5)
- Mackerel (1)
- Mew (18)
- MongoDB (1)
- Mozilla (19)
- Music (1)
- MySQL (1)
- NAS (4)
- nginx (6)
- NHK (1)
- Node (1)
- ntp (4)
- OOP (1)
- OpenID (2)
- openssl (1)
- Opera (2)
- OSX (41)
- Perl (14)
- PHP (19)
- PostgreSQL (1)
- procmail (4)
- Programing (3)
- Puppet (1)
- Python (2)
- Rails (10)
- Rake (2)
- RaspberryPi (1)
- RedHat (29)
- Redmine (3)
- Rspec (1)
- Ruby (48)
- samba (3)
- screen (7)
- sed (5)
- serverspec (6)
- sh (8)
- Slack (2)
- Solaris9 (22)
- Spring (2)
- ssh (4)
- StatusNet (21)
- svn (12)
- Swift (1)
- Tablet (1)
- tdiary (3)
- Twitter (14)
- Twmode (6)
- Ubuntu (5)
- UNIX (102)
- vagrant (8)
- Video (21)
- vim (1)
- Wercker (9)
- Windows (29)
- Wine (3)
- XML (11)
- XP (1)
- zsh (25)
- インストールメモ (33)
- クイックシェイプ (12)
- ネタ (15)
- 勉強会 (13)
- 携帯 (6)
- 正規表現 (4)
過去ログ
2017 : 01 02 03 04 05 06 07 08 09 10 11 12
2016 : 01 02 03 04 05 06 07 08 09 10 11 12
2015 : 01 02 03 04 05 06 07 08 09 10 11 12
2014 : 01 02 03 04 05 06 07 08 09 10 11 12
2013 : 01 02 03 04 05 06 07 08 09 10 11 12
2012 : 01 02 03 04 05 06 07 08 09 10 11 12
2011 : 01 02 03 04 05 06 07 08 09 10 11 12
2010 : 01 02 03 04 05 06 07 08 09 10 11 12
2009 : 01 02 03 04 05 06 07 08 09 10 11 12
2008 : 01 02 03 04 05 06 07 08 09 10 11 12
2007 : 01 02 03 04 05 06 07 08 09 10 11 12
2006 : 01 02 03 04 05 06 07 08 09 10 11 12
2005 : 01 02 03 04 05 06 07 08 09 10 11 12
2004 : 01 02 03 04 05 06 07 08 09 10 11 12
2003 : 01 02 03 04 05 06 07 08 09 10 11 12
2002 : 01 02 03 04 05 06 07 08 09 10 11 12
2001 : 01 02 03 04 05 06 07 08 09 10 11 12
Google+