--- a/UserPreferences.st	Mon Jan 27 23:59:16 2014 +0100
+++ b/UserPreferences.st	Tue Jan 28 20:26:42 2014 +0100
@@ -610,7 +610,6 @@
 ! !
 
 
-
 !UserPreferences methodsFor:'accessing-locale'!
 
 dateInputFormat
@@ -3518,6 +3517,30 @@
 
 !UserPreferences methodsFor:'accessing-prefs-editor'!
 
+appendAbbreviationsToCompletionSuggestions
+    "show abbreviations in completion"                                                                 
+
+    ^ self at:#appendAbbreviationsToCompletionSuggestions ifAbsent:false
+
+    "
+     UserPreferences current appendAbbreviationsToCompletionSuggestions
+     UserPreferences current appendAbbreviationsToCompletionSuggestions:true
+     UserPreferences current appendAbbreviationsToCompletionSuggestions:false
+    "
+!
+
+appendAbbreviationsToCompletionSuggestions:aBoolean
+    "show abbreviations in completion"                                                                 
+
+    ^ self at:#appendAbbreviationsToCompletionSuggestions put:aBoolean
+
+    "
+     UserPreferences current appendAbbreviationsToCompletionSuggestions
+     UserPreferences current appendAbbreviationsToCompletionSuggestions:true
+     UserPreferences current appendAbbreviationsToCompletionSuggestions:false
+    "
+!
+
 codeCompletionOnControlKey
     "show completion with CTRL-key - experimental"                                                                 
 
@@ -4539,11 +4562,11 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.353 2014-01-14 11:56:04 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.354 2014-01-28 19:26:42 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.353 2014-01-14 11:56:04 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.354 2014-01-28 19:26:42 cg Exp $'
 !
 
 version_SVN