--- a/InspectorView.st	Fri Sep 30 18:23:10 2016 +0200
+++ b/InspectorView.st	Fri Sep 30 19:48:26 2016 +0200
@@ -23,7 +23,7 @@
 		holderChangeInterest sortOrderHolder'
 	classVariableNames:'DefaultIcon DefaultIntegerDisplayRadix ExpandArraysInAllLists
 		IdDictionary LastExtent NextSequentialID SortOrderAlphabetical
-		SortOrderInstvarOrder'
+		SortOrderInstvarOrder DefaultHideMessages DefaultHideHashes'
 	poolDictionaries:''
 	category:'Interface-Inspector'
 !
@@ -310,6 +310,22 @@
     "Modified: / 7.9.1998 / 14:15:38 / cg"
 !
 
+defaultHideHashes
+    ^ DefaultHideHashes? true
+!
+
+defaultHideHashes:aBoolean
+    DefaultHideHashes := aBoolean
+!
+
+defaultHideMessages
+    ^ DefaultHideMessages ? true
+!
+
+defaultHideMessages:aBoolean
+    DefaultHideMessages := aBoolean
+!
+
 defaultIcon
     "return the browsers default window icon"
 
@@ -1702,7 +1718,9 @@
     super initialize.
 
     displayStringMessage := #displayString.
-    hideReceiver := hideMessages := hideHashes := false.
+    hideReceiver := false.
+    hideHashes := self class defaultHideHashes.
+    hideMessages := self class defaultHideMessages.
     integerDisplayRadix := (DefaultIntegerDisplayRadix ? 10).
     sortOrder := SortOrderInstvarOrder.
     sortOrderHolder := sortOrder asValue.