comparison lisp/term/mac-win.el @ 80523:393b3d64ca25

(mac-ts-active-input-buf): Move defvar to macterm.c.
author YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
date Wed, 23 Apr 2008 08:56:55 +0000
parents 866d9d0f14ac
children df6f9d73861f
comparison
equal deleted inserted replaced
80522:020ac20bda39 80523:393b3d64ca25
81 (defvar mac-service-selection) 81 (defvar mac-service-selection)
82 (defvar mac-system-script-code) 82 (defvar mac-system-script-code)
83 (defvar mac-apple-event-map) 83 (defvar mac-apple-event-map)
84 (defvar mac-font-panel-mode) 84 (defvar mac-font-panel-mode)
85 (defvar mac-ts-active-input-overlay) 85 (defvar mac-ts-active-input-overlay)
86 (defvar mac-ts-active-input-buf)
86 (defvar x-invocation-args) 87 (defvar x-invocation-args)
87 88
88 (defvar x-command-line-resources nil) 89 (defvar x-command-line-resources nil)
89 90
90 ;; Handler for switches of the form "-switch value" or "-switch". 91 ;; Handler for switches of the form "-switch value" or "-switch".
1857 'showhide-speedbar) 1858 'showhide-speedbar)
1858 1859
1859 ) ;; (fboundp 'mac-set-font-panel-visible-p) 1860 ) ;; (fboundp 'mac-set-font-panel-visible-p)
1860 1861
1861 ;;; Text Services 1862 ;;; Text Services
1862 (defvar mac-ts-active-input-buf ""
1863 "Byte sequence of the current Mac TSM active input area.")
1864 (defvar mac-ts-update-active-input-area-seqno 0 1863 (defvar mac-ts-update-active-input-area-seqno 0
1865 "Number of processed update-active-input-area events.") 1864 "Number of processed update-active-input-area events.")
1866 (setq mac-ts-active-input-overlay (make-overlay 0 0)) 1865 (setq mac-ts-active-input-overlay (make-overlay 0 0))
1867 1866
1868 (defface mac-ts-caret-position 1867 (defface mac-ts-caret-position