Merge pull request livecode#811 from runrevsebastien/bugfix-12552

livecodesebastien · livecodesebastien · commit e2b01af11212 · 2014-07-15T09:28:18.000+01:00
[[ Bug 12552 ]] go to url "internet stack path" does not work
diff --git a/docs/notes/bugfix-12552.md b/docs/notes/bugfix-12552.md
@@ -0,0 +1 @@
+# go to url internet stack path does not work
diff --git a/engine/src/cmdss.cpp b/engine/src/cmdss.cpp
@@ -1130,6 +1130,21 @@ void MCGo::exec_ctxt(MCExecContext &ctxt)
             }
 
 			cptr = sptr->getchild(card->etype, *t_exp, card->otype);
+
+            // SN-2014-06-03 [[ Bug 12552]] go to url "internet stack path" does not work
+            // If getchild() failed, we try to find a stack from the expression
+            if (cptr == NULL)
+            {
+				sptr = findstack(ctxt, *t_exp, CT_STACK, cptr);
+				if (sptr == NULL)
+				{
+					if (MCresult->isclear())
+						MCresult->setvalueref(MCSTR("No such a card"));
+
+					return ES_NORMAL;
+				}
+				cptr = (MCCard *)sptr->getchild(CT_THIS, kMCEmptyString, CT_CARD);
+            }
 		}
 			break;
 		default:

Original file line number	Diff line number	Diff line change
`@@ -0,0 +1 @@`
	`1`	`+# go to url internet stack path does not work`