--- a/EditTextView.st	Tue Nov 08 22:40:51 2016 +0100
+++ b/EditTextView.st	Wed Nov 09 03:18:49 2016 +0100
@@ -6291,7 +6291,8 @@
 !EditTextView methodsFor:'menu & menu actions'!
 
 babelFishTranslate:fromToModeString
-    "translate the selected text and paste it after the selection"
+    "translate the selected text and paste it after the selection.
+     This is now obsolete, as that web service no longer exists (sigh)"
 
     |original translated|
 
@@ -6299,19 +6300,20 @@
     original size == 0 ifTrue:[^ self].
 
     self withWaitCursorDo:[
-	(HostNameLookupError , SOAP::SoapImplError) handle:[:ex |
-	    Dialog warn:('Translation failed - WEB Service error:\\%1.' bindWith:ex description allBold) withCRs
-	] do:[
-	    translated := SOAP::BabelFishClient new translate:original mode:fromToModeString.
-	]
+        (HostNameLookupError , SOAP::SoapImplError) handle:[:ex |
+            Dialog warn:('Translation failed - WEB Service error:\\%1.' bindWith:ex description allBold) withCRs
+        ] do:[
+            translated := SOAP::BabelFishClient new 
+                            translate:original mode:fromToModeString.
+        ]
     ].
 
     "/ v pasteOrReplace:translated
     self cursorLine:(self selectionEndLine) col:(self selectionEndCol + 1).
     self unselect.
     self
-	undoablePaste:translated
-	info:'Translate'
+        undoablePaste:translated
+        info:'Translate'
 
     "Modified: / 28-07-2007 / 13:27:21 / cg"
 !