Lines Matching defs:try
47 See `erc-try-complete-nick' for more technical info.
50 (let ((hippie-expand-try-functions-list '(erc-try-complete-nick)))
108 (defun erc-try-complete-nick (old)
110 This is a function to put on `hippie-expand-try-functions-list'.
114 (try-complete-erc-nick old erc-pals))
116 (try-complete-erc-nick old (append
120 (try-complete-erc-nick old (funcall erc-nick-completion)))
122 (try-complete-erc-nick old erc-nick-completion))))
124 (defvar try-complete-erc-nick-window-configuration nil
125 "The window configuration for `try-complete-erc-nick'.
128 from here. See `try-complete-erc-nick-restore' and
129 `try-complete-erc-nick'.")
131 (defun try-complete-erc-nick-restore ()
133 (if (not try-complete-erc-nick-window-configuration)
137 try-complete-erc-nick-window-configuration)
138 (setq try-complete-erc-nick-window-configuration nil)))
140 (defun try-complete-erc-nick (old completions)
141 "Try to complete current word depending on `erc-try-complete-nick'.
149 `try-complete-erc-nick-window-configuration'."
168 (setq expansion (try-completion he-search-string alist)
171 (eq t (try-completion expansion alist))))))
174 (try-complete-erc-nick-restore)
179 (try-complete-erc-nick-restore)
187 (try-complete-erc-nick-restore)
192 (try-complete-erc-nick-restore)
199 (setq try-complete-erc-nick-window-configuration