Remove my-company-lighter-current-length

Debugger entered--Lisp error: (error "`global' non-zero exit: global: GTAGS not found.")
  signal(error ("`global' non-zero exit: global: GTAGS not found."))
  error("`%s' non-zero exit: %s" "global" "global: GTAGS not found.")
  ggtags-process-string("global" "--ignore-case" "-c" "sys")
  apply(ggtags-process-string "global" ("--ignore-case" "-c" "sys"))
  #f(compiled-function (prefix) #<bytecode 0x40751ea1>)("sys")
  #f(compiled-function (string pred action) #<bytecode 0x40751ec9>)("sys" nil t)
  all-completions("sys" #f(compiled-function (string pred action) #<bytecode 0x40751ec9>) nil)
  completion-pcm--all-completions("" ("sys" point) #f(compiled-function (string pred action) #<bytecode 0x40751ec9>) nil)
  completion-basic-all-completions("sys" #f(compiled-function (string pred action) #<bytecode 0x40751ec9>) nil 3)
  #f(compiled-function (style) #<bytecode 0x4088a97f>)(basic)
  completion--some(#f(compiled-function (style) #<bytecode 0x4088a97f>) (basic partial-completion emacs22))
  completion--nth-completion(2 "sys" #f(compiled-function (string pred action) #<bytecode 0x40751ec9>) nil 3 nil)
  completion-all-completions("sys" #f(compiled-function (string pred action) #<bytecode 0x40751ec9>) nil 3)
  company-capf(candidates "sys")
  apply(company-capf (candidates "sys"))
  company-call-backend-raw(candidates "sys")
  apply(company-call-backend-raw (candidates "sys"))
  company--force-sync(company-call-backend-raw (candidates "sys") company-capf)
  company-call-backend(candidates "sys")
  company--fetch-candidates("sys")
  company-calculate-candidates("sys" nil)
  company--begin-new()
  company--perform()
  company-auto-begin()
  company-manual-begin()
  my-company-lighter-current-length()
  eval((my-company-lighter-current-length))
  redisplay_internal\ \(C\ function\)()

emacs.el

@@ -349,6 +349,10 @@ found, otherwise returns nil."
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; editor
 
+;; Basically it should not set globally (instead use something like file local
+;; variables or editorconfig), but for most cases I just need this...
+(setq-default require-final-newline t)
+
 ;; Used from term-cursor
 ;; hbar is too hard to find...
 (defun my-cursor-type-change (&rest args)
@@ -1173,6 +1177,7 @@ found, otherwise returns nil."
                  (not (minibufferp))
                  ;; Do nothing when already in company completion
                  (not company-candidates))
+        ;; FIXME: Somehow it cannto catch errors from ggtags
         (ignore-errors
           ;; (company-auto-begin)
           (company-manual-begin)
@@ -1184,9 +1189,9 @@ found, otherwise returns nil."
 
   (defvar company-lighter)
   (set-variable 'company-lighter-base "Cmp")
-  (add-to-list 'company-lighter
-               '(:eval (my-company-lighter-current-length))
-               t)
+  ;; (add-to-list 'company-lighter
+  ;;              '(:eval (my-company-lighter-current-length))
+  ;;              t)
 
   ;; This breaks japanese text input
   ;; (set-variable 'my-company-length-popup-tip-timer