"Eric M. Ludlam" <eric@...> writes:
[...]
> According to the ctags, you can add --exclude="*flymake*", but I don't
> know if that works when a file is explicitly listed, as this tool is
> doing. In any case, you can put that into a ~/.ctags to try it.
Something like this seems to work:
Index: semantic/semantic-idle.el
===================================================================
RCS file: /cvsroot/cedet/cedet/semantic/semantic-idle.el,v
retrieving revision 1.51
diff -u -r1.51 semantic-idle.el
--- semantic/semantic-idle.el 7 Sep 2008 14:16:02 -0000 1.51
+++ semantic/semantic-idle.el 22 Oct 2008 12:30:47 -0000
@@ -463,9 +463,12 @@
(when (eq (cdr a) major-mode)
(dolist (file (directory-files default-directory t (car a) t))
(semantic-throw-on-input 'parsing-mode-buffers)
- (save-excursion
- (semanticdb-file-table-object file)
- ))))
+ (if (not
+ (run-hook-with-args-until-success 'semantic-idle-inhibit-functions
+ file))
+ (save-excursion
+ (semanticdb-file-table-object file)
+ )))))
))
(defun semantic-idle-pnf-test ()
Index: semantic/semantic.el
===================================================================
RCS file: /cvsroot/cedet/cedet/semantic/semantic.el,v
retrieving revision 1.209
diff -u -r1.209 semantic.el
--- semantic/semantic.el 15 Sep 2008 00:24:31 -0000 1.209
+++ semantic/semantic.el 22 Oct 2008 12:30:47 -0000
@@ -261,6 +261,15 @@
:group 'semantic
:type 'hook)
+(defcustom semantic-idle-inhibit-functions nil
+ "List of functions to call with the name of a file before Semantic tries
+to process it while idle.
+If any of these functions returns non-nil, the file is not processed. (It may
+be processed if visited, but will not be processed simply because it is
+neighbouring a visited file.)"
+ :group 'semantic
+ :type 'hook)
+
(defvar semantic-init-hooks nil
"*Hooks run when a buffer is initialized with a parsing table.")
|