;ELC   
;;; compiled by jwz@thalidomide on Thu Feb  3 22:27:18 1994
;;; from file /th/jwz/emacs19/lisp/packages/icomplete.el
;;; emacs version 19.10 Lucid (beta1).
;;; bytecomp version 2.22; 22-dec-93.
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19")))
    (error "This file was compiled for Emacs 19."))

(provide 'icomplete)
(defvar icomplete-inhibit nil "\
*Set this variable to t at any time to inhibit icomplete.")
(defvar icomplete-eoinput 1 "\
Point where minibuffer input ends and completion info begins.")
(make-variable-buffer-local 'icomplete-eoinput)
(fset 'icomplete-prime-session #[nil "АБ\n\"«ЎГ\nД”Д•O!‰ЖV«†ЗИЙ\"Є‹ЗКЛМ#€ЗНОМ#)‡АП\n\"«ЊЗКЛМ#€ЗНОМ#‡­ЃС‡" [string-match "^19\\.\\([0-9]+\\)\\." emacs-version string-to-int 1 vers 17 add-hook minibuffer-setup-hook icomplete-prime-minibuffer pre-command-hook icomplete-pre-command-hook append post-command-hook icomplete-post-command-hook "Lucid" format "try prior icomplete code"] 5 "\
Prep emacs v 19 for icompletion.  For emacs v19.18 and later revs,
icomplete is installed in 'minibuffer-setup-hook'.  Global pre- and
post-command-hook functions are used in v19.17 and earlier revs."])
(fset 'icomplete-prime-minibuffer #[nil "АБ!€АВ!€ГБД\"€ГВЕ\"‡" [make-local-variable pre-command-hook post-command-hook add-hook icomplete-pre-command-hook icomplete-post-command-hook] 3 "\
Prep emacs, v 19.18 or later, for icomplete.  (icomplete-prime-
session establishes global hooks, instead, in emacs 19 versions 19.17
and prior.)  Run via minibuffer-setup-hook (emacs 19.18 or later),
adds icomplete pre- and post-command hooks to do icomplete display
management."])
(fset 'icomplete-window-minibuffer-p #[nil "АБ!«„ВГ!‡В ‡" [boundp lucid-logo window-minibuffer-p nil] 2 "\
Returns non-nil if current window is a minibuffer window."])
(fset 'icomplete-pre-command-hook #[nil "А ­Ё	9?­Ј\n?­џГД!«“«ђdV«„d‰‡d|)‡ЖД!€З‰‡" [icomplete-window-minibuffer-p minibuffer-completion-table icomplete-inhibit boundp icomplete-eoinput buffer-undo-list make-local-variable 1] 2 "\
Cleanup completions exhibit before user's new input (or whatever) is dealt
with."])
(fset 'icomplete-post-command-hook #[nil "А ­Ћ	?­Љ\n9?­…Д )‡" [icomplete-window-minibuffer-p icomplete-inhibit minibuffer-completion-table buffer-undo-list icomplete-exhibit] 1 "\
Exhibit completions, leaving icomplete-eoinput with position where user
input leaves off and exhibit begins, so icomplete-pre-command-hook can
subsequently cleanup."])
(fset 'icomplete-window-setup-hook #[nil "А «„БВ!‡ГД!‡" [icomplete-window-minibuffer-p message "ic ws doing" sit-for 1] 2 "\
Exhibit completions, leaving icomplete-eoinput with position where user
input leaves off and exhibit begins, so icomplete-pre-command-hook can
subsequently cleanup."])
(fset 'icomplete-exhibit #[nil "9?­¦ed{БЉdb€ДЕ!¬„ЖЕ!€`dЗV­‹ИЙ\n?$!+‡" [minibuffer-completion-table t buffer-undo-list contents boundp icomplete-eoinput make-local-variable 1 insert-string icomplete-prompt minibuffer-completion-predicate minibuffer-completion-confirm] 6 "\
Exhibit completions, leaving icomplete-eoinput with position where user
input leaves off and exhibit begins, so icomplete-pre-command-hook can
subsequently cleanup."])
(fset 'icomplete-prompt #[(name candidates predicate require-match) "А	\n#«ѓЕЄЃЖ«ѓЗЄЃИЙК‰¬‰РС#ЄбA¬њ@G	GV«Ћ@	GТOQЄЃУФPЄАХ	\n#‰GТЩЪЩЫЬЭ\"\"A\"	GV­‹	GТOQ«†ЯPЄ‚R,-‡" [all-completions name candidates predicate require-match "(" "[" ")" "]" "{" "}" close-bracket-prospects open-bracket-prospects close-bracket-determined open-bracket-determined comps format " %sNo matches%s" nil "" " [Matched]" try-completion most most-len most-is-exact apply concat append mapcar #[(com) "G	U«„ВД‡Е	ДOD‡" [com most-len t most-is-exact nil ","] 4] alternatives ","] 8 "\
Identify prospective candidates for minibuffer completion.

The display is updated with each minibuffer keystroke when icomplete
is enabled (by loading the 'icomplete' elisp package) and doing
minibuffer completion.

Prospective completion suffixes (if any) are displayed, bracketed by
one of (), [], or {} pairs.  The choice of brackets is as follows:

  (...) - a single prospect is identified and matching is enforced,
  [...] - a single prospect is identified but matching is optional, or
  {...} - multiple prospects, separated by commas, are indicated, and
          further input is required to distingish a single one.

The displays for disambiguous matches have \" [Matched]\" appended
(whether complete or not), or \" [No matches]\", if no eligible
matches exist."])
(icomplete-prime-session)