From d2b1a4201985a4ed35aed49bcff46b7d4d75d4d3 Mon Sep 17 00:00:00 2001
From: alexwl <alexey.a.kiryushin@gmail.com>
Date: Fri, 5 Oct 2018 00:31:50 +0300
Subject: Clicking on an external identifier at definition site opens 'find
 references'

---
 javascript/app/components/haskell-module.js | 23 +++++++++++++++--------
 1 file changed, 15 insertions(+), 8 deletions(-)

(limited to 'javascript/app/components/haskell-module.js')

diff --git a/javascript/app/components/haskell-module.js b/javascript/app/components/haskell-module.js
index 8883a9c..cf750b9 100644
--- a/javascript/app/components/haskell-module.js
+++ b/javascript/app/components/haskell-module.js
@@ -155,16 +155,23 @@ function initializeIdentifiers (sourceCodeContainerElement,component) {
                          currentLineNumber);
         }
         else {          
-          if(!idOccurrenceInfo.isBinder && identifierInfo
-             && (event.which === 1 || event.which === 2)) {            
-            goToDefinition(component.get('store'),
-                           identifierInfo.locationInfo,
-                           event.which,
-                           currentLineNumber);
+          if(identifierInfo && (event.which === 1 || event.which === 2)) {            
+            if(!idOccurrenceInfo.isBinder) {
+              goToDefinition(component.get('store'),
+                             identifierInfo.locationInfo,
+                             event.which,
+                             currentLineNumber);
+            } else {
+              if(identifierInfo.sort === "External") {
+                component.get('findReferences')(component.get('packageId'),
+                                                identifierInfo.externalId,
+                                                identifierInfo.demangledOccName);
+
+              }
+            }
           }
         }
-      }
-      
+      }      
       identifierElement.onmouseover = () => {
         highlightIdentifiers(sourceCodeContainerElement,identifierElement,true);
         if(timer) {
-- 
cgit v1.2.3