# HG changeset patch # User Claus Gittinger # Date 1363701247 -3600 # Node ID 8cff01f9f552b85b09b1f71396d03a49459694bc # Parent 2d1bd93f29d11a8803ce810149defd87766c745a class: AbstractFileBrowser added: #compressTabsOnSave diff -r 2d1bd93f29d1 -r 8cff01f9f552 AbstractFileBrowser.st --- a/AbstractFileBrowser.st Tue Mar 19 14:53:54 2013 +0100 +++ b/AbstractFileBrowser.st Tue Mar 19 14:54:07 2013 +0100 @@ -8455,6 +8455,14 @@ "Modified: / 04-12-2006 / 13:14:25 / cg" ! +compressTabsOnSave + "if true, compress leading spaces (multiples of 8) with a tab character + when saving. + Default is true" + + ^ true +! + currentFilesAreInSameDirectory ^ self parentDirectoriesOfCurrentFiles size < 2 @@ -9128,10 +9136,10 @@ !AbstractFileBrowser class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.513 2013-03-16 11:58:43 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.514 2013-03-19 13:54:07 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.513 2013-03-16 11:58:43 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.514 2013-03-19 13:54:07 cg Exp $' ! !