Name advice function, link to u/hvis's comment

1 files changed, 11 insertions, 10 deletions

diff --git a/README.org b/README.org
index d27ffc6..a660016 100644
--- a/README.org
+++ b/README.org
@@ -388,17 +388,18 @@ But there are a couple of points of discomfort:
 
    (Aren't dynamically scoped variables and the advice system nifty?)
    
-   If you would like to use different =completion-styles= with =company-capf= instead, you 
-   can add this to your config: 
+If you would like to use different =completion-styles= with =company-capf= instead, you 
+can add this to your config: 
 
-   #+begin_src emacs-lisp
-  ;; https://www.reddit.com/r/emacs/comments/nichkl/how_to_use_different_completion_styles_in_the/
-  (advice-add 'company-capf
-              :around
-              (lambda (capf-fn &rest args)
-                (let ((completion-styles '(basic partial-completion)))
-                  (apply capf-fn args))))
-   #+end_src
+#+begin_src emacs-lisp
+  ;; We follow a suggestion by company maintainer u/hvis:
+  ;; https://www.reddit.com/r/emacs/comments/nichkl/comment/gz1jr3s/
+  (defun company-completion-styles (capf-fn &rest args)
+    (let ((completion-styles '(basic partial-completion)))
+      (apply capf-fn args))
+
+  (advice-add 'company-capf :around #'company-completion-styles)
+#+end_src
 
 
 * Related packages