diff -r 17a8d15d9b88 -r 66bf9fc0dfe4 Workspace.st --- a/Workspace.st Tue Apr 25 12:58:23 2017 +0200 +++ b/Workspace.st Tue Apr 25 12:59:11 2017 +0200 @@ -643,6 +643,8 @@ ! editedLanguage + "get the programming language (for comments, indentation etc.)" + |mthd cls| editedLanguage notNil ifTrue:[ @@ -657,13 +659,18 @@ ^ nil "Modified: / 18-09-2013 / 12:58:55 / Jan Vrany " + "Modified (comment): / 25-04-2017 / 12:53:40 / cg" ! editedLanguage:aProgrammingLanguageOrNil + "set the programming language (for comments, indentation etc.)" + editedLanguage := aProgrammingLanguageOrNil. aProgrammingLanguageOrNil notNil ifTrue:[ - commentStrings := aProgrammingLanguageOrNil commentStrings. + commentStrings := aProgrammingLanguageOrNil commentStrings. ]. + + "Modified (comment): / 25-04-2017 / 12:53:33 / cg" ! editedMethod