 (setq tags-revert-without-query t)
 ;; Do case-sensitive tag searches
 (setq tags-case-fold-search nil) ;; t=case-insensitive, nil=case-sensitive
-;; Don't warn when TAGS files are large
-(setq large-file-warning-threshold nil)
+;; Increase the warning threshold to be more than normal TAGS file sizes
+(setq large-file-warning-threshold 30000000) ;; 30MB
 
 
 ;; ;; List all directories from which you want to read the TAGS files

;; Time-stamp: <2014-03-11 13:04:07 kmodi>

;; ctags, etags


(define-key etags-select-mode-map (kbd "C-g")   'etags-select-quit)
;; Also quit etags-select when cursor moves to another window
(define-key etags-select-mode-map (kbd "C-x o") 'etags-select-quit)
(define-key etags-select-mode-map (kbd "C-x O") 'etags-select-quit)
(define-key etags-select-mode-map (kbd "C-p")   'etags-select-previous-tag)
(define-key etags-select-mode-map (kbd "C-n")   'etags-select-next-tag)
;; default etags-select bindings
