 ;;;; (:require-patch "")
 ;;;; HISTORY :
 ;;;; $Log$
+;;;; Revision 3.6  2015/05/06 13:36:07  troche
+;;;; * show arglist on completion
+;;;;
 ;;;; Revision 3.5  2015/05/04 14:37:04  troche
 ;;;; * display the package only in the documentation
 ;;;;

	;; insert the package at the right position
	(when package 
	  (backward-char (length candidate))
	  ;; check that the package is not already there	  	  
	  (unless (equal (buffer-substring-no-properties (point) (+ (point) (length package) 1))
			 (format "%s:" package))
	    (insert package)
	    (insert "::")))))))

;; see eli/fi-lep.el in allegro lisp install directory
(defun alisp-functions-ac-candidates ()


;;  (ac-set-trigger-key "<backtab>")
;; always autocomplete on backtab
(define-key ac-mode-map (read-kbd-macro "<backtab>") (lambda () (interactive) (ac-trigger-key-command t)))
(add-to-list 'ac-modes 'fi:common-lisp-mode)
(add-to-list 'ac-modes 'fi:inferior-common-lisp-mode)
(add-to-list 'ac-modes 'fi:lisp-listener-mode)
