Can you explain the difference between
Unprotect@Graph
With[
{uq = Unique[]},
uq = False;
expr : Graph[___] /; (uq = ! uq) := (Print[Unevaluated@expr]; expr)
]
ue = UndirectedEdge;
Graph[{ue[1, 2], ue[2, 3]}]
(*prints*)
and
Unprotect@Times
(*Clear@Plot*)
With[
{uq = Unique[]},
uq = False;
expr : Times[___] /; (uq = ! uq) := (Print[Unevaluated@expr]; expr)
]
Times[2, 3]
(*does not print*)
?