[nongnu] elpa/haskell-tng-mode aa9cdbb 226/385: hacky file-specific language extensions

[ELPA Syncer]

branch: elpa/haskell-tng-mode
commit aa9cdbb7341767beda8a7ccb80c33a0f23ceccd7
Author: Tseen She <ts33n.sh3@gmail.com>
Commit: Tseen She <ts33n.sh3@gmail.com>

    hacky file-specific language extensions
---
 haskell-tng-hsinspect.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/haskell-tng-hsinspect.el b/haskell-tng-hsinspect.el
index 75a4c64..f0051e9 100644
--- a/haskell-tng-hsinspect.el
+++ b/haskell-tng-hsinspect.el
@@ -21,6 +21,10 @@
   :type 'listp
   :group 'haskell-tng)
 
+(defvar-local haskell-tng-hsinspect-langexts nil)
+;; TODO improve the validity checker
+(put 'haskell-tng-hsinspect-langexts 'safe-local-variable #'listp)
+
 (defun haskell-tng-fqn-at-point ()
   "Consult the imports in scope and display the fully qualified
 name of the symbol at point in the minibuffer."
@@ -57,7 +61,8 @@ t means the process failed.")
                  ;; TODO async
                  (car haskell-tng-hsinspect) nil "*hsinspect*" nil
                  (append (cdr haskell-tng-hsinspect)
-                         `("hsinspect" "imports" ,buffer-file-name))))
+                         `("hsinspect" "imports" ,buffer-file-name)
+                         haskell-tng-hsinspect-langexts)))
           (message "hsinspect failed, semantic support disabled")
         (setq haskell-tng--hsinspect-imports
               (with-current-buffer "*hsinspect*"