--- a/Tools__InternationalLanguageTranslationEditor.st Wed Apr 02 12:33:06 2008 +0200
+++ b/Tools__InternationalLanguageTranslationEditor.st Tue Apr 22 17:43:56 2008 +0200
@@ -2481,6 +2481,7 @@
|message|
message := 'End of list reached, starting from the beginning'.
self searchTextRestarted: message.
+ Smalltalk beep.
self searchNextTextFromBeginning.
"Created: / 16-06-2007 / 11:00:59 / Administrador"
@@ -2545,6 +2546,7 @@
|message|
message := 'Beginning of list reached, starting from the end'.
self searchTextRestarted: message.
+ Smalltalk beep.
self searchPreviousTextFromEnd.
"Created: / 16-06-2007 / 11:01:23 / Administrador"