     ;; Cancel selections by typing non-mathcing characters
     (setq company-require-match 'never)
     ;; Minimum length of word to start completion
-    (setq company-minimum-prefix-length 2)
+    (setq company-minimum-prefix-length 0)
     ;; Autocomplete only when I explicitly mean to
     (setq company-auto-complete nil)
-    (set 'company-idle-delay 1)
+    (set 'company-idle-delay nil)
     (setq company-auto-select-first-candidate nil)
     )
 

  (setq default-directory "~/")

  ;; Frame size
  (add-to-list 'default-frame-alist '(height . 80))
  (add-to-list 'default-frame-alist '(width . 130))
  
  ;; sensible GUI

    :config
    (eval-after-load 'company
      '(progn
	 (set-variable 'helm-company-initialize-pattern-with-prefix t)
	 (define-key company-mode-map (kbd "<S-SPC>") 'helm-company)
	 (define-key company-active-map (kbd "<S-SPC>") 'helm-company)))
    )
