--- a/extensions.st	Tue Jun 12 10:59:23 2018 +0200
+++ b/extensions.st	Tue Jun 12 11:45:20 2018 +0200
@@ -870,6 +870,20 @@
     ^ DictionaryInspectorView
 ! !
 
+!Dictionary methodsFor:'inspecting'!
+
+inspectorExtraAttributes
+    |attrs|
+
+    attrs := super inspectorExtraAttributes.
+    JSONPrinter notNil ifTrue:[
+        attrs add:('-JSON' -> [ JSONPrinter toJSON:self ])
+    ].
+    ^ attrs
+
+    "Created: / 12-06-2018 / 11:43:57 / Claus Gittinger"
+! !
+
 !EditTextView methodsFor:'accessing-dimensions'!
 
 absoluteXOfPosition:positionInText 
@@ -2357,6 +2371,20 @@
     "Modified (comment): / 31-05-2018 / 11:26:33 / Claus Gittinger"
 ! !
 
+!SequenceableCollection methodsFor:'inspecting'!
+
+inspectorExtraAttributes
+    |attrs|
+
+    attrs := super inspectorExtraAttributes.
+    JSONPrinter notNil ifTrue:[
+        attrs add:('-JSON' -> [ JSONPrinter toJSON:self ])
+    ].
+    ^ attrs
+
+    "Created: / 12-06-2018 / 11:43:13 / Claus Gittinger"
+! !
+
 !Set methodsFor:'misc ui support'!
 
 inspectorClass