--- a/AbstractSettingsApplication.st	Wed Sep 26 14:17:39 2012 +0200
+++ b/AbstractSettingsApplication.st	Wed Sep 26 14:17:44 2012 +0200
@@ -1535,7 +1535,7 @@
     self supportsJustInTimeCompilation ifTrue:[
         self fullDebugSupport value:(ObjectMemory fullSingleStepSupport ? false)
     ] ifFalse:[
-        self fullDebugSupport value:(Compiler lineNumberInfo == #full)
+        self fullDebugSupport value:(ParserFlags fullLineNumberInfo)
     ].
 
     self supportsJustInTimeCompilation ifTrue:[
@@ -1546,7 +1546,7 @@
 
     self warnAboutMissingMethodComment value:(UserPreferences current enforceComment).
 
-    "Modified: / 17-07-2010 / 14:48:38 / cg"
+    "Modified: / 26-09-2012 / 14:16:32 / cg"
 !
 
 basicSaveSettings
@@ -1554,11 +1554,7 @@
         writeAspects:(self simpleAspects)
         to:ParserFlags.
 
-    self fullDebugSupport value ifTrue:[
-        Compiler lineNumberInfo:#full.
-    ] ifFalse:[
-        Compiler lineNumberInfo:true
-    ].
+    ParserFlags lineNumberInfo:(self fullDebugSupport value ifTrue:[#full] ifFalse:[true]).
 
     Compiler foldConstants:(self class constantFoldingOptions at:self constantFoldingSelection value).
 
@@ -1574,7 +1570,7 @@
 
     UserPreferences current enforceComment:(self warnAboutMissingMethodComment value).
 
-    "Modified: / 17-07-2010 / 14:48:57 / cg"
+    "Modified: / 26-09-2012 / 13:32:34 / cg"
 !
 
 reenableSuppressedWarnings
@@ -1815,11 +1811,13 @@
         self supportsJustInTimeCompilation ifTrue:[
             fullDebugSupport := (ObjectMemory fullSingleStepSupport ? false) asValue.
         ] ifFalse:[ 
-            fullDebugSupport := (Compiler lineNumberInfo == #full) asValue.
+            fullDebugSupport := (ParserFlags fullLineNumberInfo) asValue.
         ].
         fullDebugSupport onChangeSend:#updateModifiedChannel to:self.
     ].
     ^ fullDebugSupport.
+
+    "Modified: / 26-09-2012 / 14:16:27 / cg"
 !
 
 justInTimeCompilation
@@ -2039,7 +2037,7 @@
         hasChangedAspectIn:(self simpleAspects)
         asComparedTo:ParserFlags) ifTrue:[^ true].
 
-    ((self supportsJustInTimeCompilation value ifTrue:[ObjectMemory fullSingleStepSupport ? false] ifFalse:[Compiler lineNumberInfo == #full]) ~= self fullDebugSupport value) ifTrue:[^ true].
+    ((self supportsJustInTimeCompilation value ifTrue:[ObjectMemory fullSingleStepSupport ? false] ifFalse:[ParserFlags fullLineNumberInfo]) ~= self fullDebugSupport value) ifTrue:[^ true].
     ((Compiler foldConstants) ~= (self class constantFoldingOptions at:self constantFoldingSelection value)) ifTrue:[^ true].
     ((ObjectMemory justInTimeCompilation ? false) ~= self justInTimeCompilation value) ifTrue:[^ true].
 
@@ -2047,7 +2045,7 @@
 
     ^ false
 
-    "Modified: / 17-07-2010 / 14:48:07 / cg"
+    "Modified: / 26-09-2012 / 14:16:14 / cg"
 !
 
 supportsJustInTimeCompilation
@@ -17098,9 +17096,9 @@
 !AbstractSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.444 2012-08-26 17:26:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.445 2012-09-26 12:17:44 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.444 2012-08-26 17:26:11 cg Exp $'
-! !
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.445 2012-09-26 12:17:44 cg Exp $'
+! !