FileApplicationNoteBook.st
changeset 11589 bb69ef59a32f
parent 11588 2a4222b491ab
child 11590 dc5935e9387b
equal deleted inserted replaced
11588:2a4222b491ab 11589:bb69ef59a32f
  5046 
  5046 
  5047     |text guessedEncoding s|
  5047     |text guessedEncoding s|
  5048 
  5048 
  5049     (self lockFileEncodingHolder value ? false) ifFalse:[
  5049     (self lockFileEncodingHolder value ? false) ifFalse:[
  5050         guessedEncoding := CharacterEncoder guessEncodingOfFile:item fileName asFilename.
  5050         guessedEncoding := CharacterEncoder guessEncodingOfFile:item fileName asFilename.
  5051         guessedEncoding := guessedEncoding ? 'iso8859-1' "(self fileEncoding)".
  5051         guessedEncoding := guessedEncoding ? #'iso8859-1' "(self fileEncoding)".
  5052         self fileEncoding:(guessedEncoding asSymbol).
  5052         self fileEncoding:guessedEncoding asSymbol.
  5053     ].
  5053     ].
  5054 
  5054 
  5055     editView notNil ifTrue:[
  5055     editView notNil ifTrue:[
  5056 "/        self validateEditViewsFontEncoding.
  5056 "/        self validateEditViewsFontEncoding.
  5057         editView externalEncoding:self fileEncoding.
  5057         editView externalEncoding:self fileEncoding.
  5392 
  5392 
  5393     editView isNil ifTrue:[^ self].
  5393     editView isNil ifTrue:[^ self].
  5394 
  5394 
  5395     fileEncoding := self fileEncoding.
  5395     fileEncoding := self fileEncoding.
  5396 
  5396 
  5397     fontsEncoding := editView font encoding ? 'iso8859-1'.
  5397     fontsEncoding := editView font encoding ? #'iso8859-1'.
  5398 
  5398 
  5399     preferredFontEncoding := FontDescription preferredFontEncodingFor:fileEncoding.
  5399     preferredFontEncoding := FontDescription preferredFontEncodingFor:fileEncoding.
  5400     (CharacterEncoder isEncoding:preferredFontEncoding subSetOf:fontsEncoding) ifFalse:[
  5400     (CharacterEncoder isEncoding:preferredFontEncoding subSetOf:fontsEncoding) ifFalse:[
  5401             doNotShowFontDialog == true ifTrue:[
  5401             doNotShowFontDialog == true ifTrue:[
  5402                 action := #show
  5402                 action := #show
  6709 ! !
  6709 ! !
  6710 
  6710 
  6711 !FileApplicationNoteBook class methodsFor:'documentation'!
  6711 !FileApplicationNoteBook class methodsFor:'documentation'!
  6712 
  6712 
  6713 version
  6713 version
  6714     ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.266 2012-06-26 14:34:35 stefan Exp $'
  6714     ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.267 2012-07-10 08:00:04 stefan Exp $'
  6715 !
  6715 !
  6716 
  6716 
  6717 version_CVS
  6717 version_CVS
  6718     ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.266 2012-06-26 14:34:35 stefan Exp $'
  6718     ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.267 2012-07-10 08:00:04 stefan Exp $'
  6719 ! !
  6719 ! !