--- a/.emacs-my	Sun Jan 29 13:52:18 2017 +0200
+++ b/.emacs-my	Sun Jan 29 14:04:06 2017 +0200
@@ -1143,7 +1143,7 @@
   (cl-remove-if (lambda (str) (string-match-p "^[0-9]" str)) lst))
 
 (when (featurep 'company)
-  (push #'my/company-filter-out-numbers company-transformers))
+  (add-hook 'company-transformers #'my/company-filter-out-numbers))
 
 (defun company-executable (command &optional arg &rest ignored)
   "Company completion for executable in PATH."