diff options
Diffstat (limited to 'lisp/cedet/cedet-global.el')
| -rw-r--r-- | lisp/cedet/cedet-global.el | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/lisp/cedet/cedet-global.el b/lisp/cedet/cedet-global.el index ee1b5ce7cc8..494c41b0efe 100644 --- a/lisp/cedet/cedet-global.el +++ b/lisp/cedet/cedet-global.el @@ -93,6 +93,13 @@ SCOPE is the scope of the search, such as 'project or 'subdirs." (apply 'call-process cedet-global-gtags-command nil b nil flags) + + ;; Check for warnings. + (with-current-buffer b + (goto-char (point-min)) + (when (re-search-forward "Error\\|Warning" nil t) + (error "Output:\n%S" (buffer-string)))) + b)) (defun cedet-gnu-global-expand-filename (filename) @@ -181,8 +188,10 @@ If a database already exists, then just update it." (let ((default-directory dir)) (cedet-gnu-global-gtags-call (when root - '("-i");; Incremental update flag. - ))))) + '("-u");; Incremental update flag. + )) + ) + )) (provide 'cedet-global) |