Enhancements to Debug 'summary' to add hyperlinks

nickgammon · Aug 6, 2010 · 168458a · 168458a
1 parent 8f06582
commit 168458a
Show file tree

Hide file tree

Showing 3 changed files with 456 additions and 33 deletions.
diff --git a/doc.h b/doc.h
@@ -2001,6 +2001,9 @@ class CMUSHclientDoc : public CDocument
   void DeleteConfigurationArrays (void);
   void ResetConfigurationArrays (void);
 
+
+  void DebugHelper (const CString strAction, const CString strArgument);
+
   // helper routines to get the appropriate map
   CTriggerMap & GetTriggerMap (void)
     {

diff --git a/mushview.cpp b/mushview.cpp
@@ -2033,37 +2033,42 @@ int line,
               strScriptName.TrimRight ();
               CString strArg = strAction.Mid (iBracket + 1);
               strArg = strArg.Left (strArg.GetLength () - 1); // drop trailing )
-              long iResult = pDoc->CallPlugin (strPluginID, strScriptName, strArg);
-              CString strName = strPluginID;  // default to ID
-              if (iResult != eOK)
+              if (strPluginID == "138a692642ab4f9e7a1af63b")  // just made that up ;)
+                pDoc->DebugHelper (strScriptName, strArg);
+              else
                 {
-                CPlugin * pPlugin = pDoc->GetPlugin (strPluginID);
-                if (pPlugin)
-                  strName = pPlugin->m_strName;
-                } // end of finding plugin's name
-              switch (iResult)
-                {
-                case eNoSuchPlugin:
-                  pDoc->ColourNote ("white", "red", 
-                        TFormat ("Plugin \"%s\" is not installed",
-                                (LPCTSTR) strName));
-                  break;
-                case eNoSuchRoutine:
-                  pDoc->ColourNote ("white", "red", 
-                        TFormat ("Script routine \"%s\" is not in plugin %s",
-                                (LPCTSTR) strScriptName,
-                                (LPCTSTR) strName));
-                  break;
-
-                case eErrorCallingPluginRoutine:
-                  pDoc->ColourNote ("white", "red", 
-                        TFormat ("An error occurred calling plugin %s",
-                                (LPCTSTR) strName));
-                  break;
-
-                } // end of switch on errors
+                long iResult = pDoc->CallPlugin (strPluginID, strScriptName, strArg);
+                CString strName = strPluginID;  // default to ID
+                if (iResult != eOK)
+                  {
+                  CPlugin * pPlugin = pDoc->GetPlugin (strPluginID);
+                  if (pPlugin)
+                    strName = pPlugin->m_strName;
+                  } // end of finding plugin's name
+                switch (iResult)
+                  {
+                  case eNoSuchPlugin:
+                    pDoc->ColourNote ("white", "red", 
+                          TFormat ("Plugin \"%s\" is not installed",
+                                  (LPCTSTR) strName));
+                    break;
+                  case eNoSuchRoutine:
+                    pDoc->ColourNote ("white", "red", 
+                          TFormat ("Script routine \"%s\" is not in plugin %s",
+                                  (LPCTSTR) strScriptName,
+                                  (LPCTSTR) strName));
+                    break;
+
+                  case eErrorCallingPluginRoutine:
+                    pDoc->ColourNote ("white", "red", 
+                          TFormat ("An error occurred calling plugin %s",
+                                  (LPCTSTR) strName));
+                    break;
+
+                  } // end of switch on errors
+                }   // end of not debug helper ID
               }  // end of ( found (this should occur, really)
-            }   // end of plugin existing
+            }   // end of passing special syntax test
           else
             {  // plugin does not exist - just execute it
             pDoc->m_iExecutionDepth = 0;