 (ac-define-source "ojs-functions"
     '((candidates . ojs-functions-ac-candidates)
       (document . ojs-functions-ac-document)
+      (action . ojs-functions-ac-action)
       (symbol . "f")
       (requires . -1)))
+
+(defun ojs-functions-ac-action ()
+  (message (ojs-functions-ac-document candidate)))
 
 (defun ojs-functions-ac-document (symbol)
   (or 

(ac-define-source "ojs-methods"
    '((candidates . ojs-methods-ac-candidates)
      (document . ojs-methods-ac-document)
      (symbol . "m")
      (requires . -1)))

(defun ojs-methods-ac-document (symbol)
  (or 

;;;; (:require-patch "")
;;;; HISTORY :
;;;; $Log$
;;;; Revision 3.4  2014/10/31 16:10:14  troche
;;;; * match all items
;;;;
;;;; Revision 3.3  2014/10/31 15:09:55  troche
;;;; * debug
;;;;
