--- a/extensions.st	Tue Feb 02 23:39:08 2016 +0100
+++ b/extensions.st	Wed Feb 03 14:23:17 2016 +0100
@@ -1293,6 +1293,17 @@
     "extra (pseudo instvar) entries to be shown in an inspector."
 
     ^ super inspectorExtraAttributes
+        add:'-binary' ->
+            [
+                String
+                    streamContents:[:s |
+                        self byteSize to:1 by:-1 do:[:i |
+                            (((self basicAt:i) printStringRadix:2) paddedTo:8 with:$0)
+                                printOn:s.
+                            s space.    
+                        ]
+                    ]
+            ];
         add:'-hex' ->
             [
                 String