(interactive)
(setq ethio-prefer-ascii-space
(not ethio-prefer-ascii-space))
- (if (equal current-input-method "ethipic")
+ (if (equal current-input-method "ethiopic")
(setq current-input-method-title (quail-title)))
(force-mode-line-update))
(quail-defrule (car keys) (car puncs) "ethiopic")
(setq keys (cdr keys)
puncs (cdr puncs)))
- (if (equal current-input-method "ethipic")
+ (if (equal current-input-method "ethiopic")
(setq current-input-method-title (quail-title)))
(force-mode-line-update)))