X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=ADPARSER.PAS;fp=ADPARSER.PAS;h=e3146f488d1f4180d1c95d8a9f6fb82bf30a9c3a;hb=4057009e278b31979aac3f8930ae52eec58f0168;hp=09939d9fedfd4dea2fc43e2db2db3c181f5c16d1;hpb=8df48adc9bdcc0e32df0fcd6720489e655348231;p=beyond-jp%2Fbeyond-jp.git

diff --git a/ADPARSER.PAS b/ADPARSER.PAS
index 09939d9..e3146f4 100644
--- a/ADPARSER.PAS
+++ b/ADPARSER.PAS
@@ -79,7 +79,7 @@ procedure Format(var input : Str80);
     while(length(input)>0)and(input[1]=' ')do delete(input,1,1);
     while(length(input)>0)and(input[length(input)]=' ')do
      delete(input,length(input),1);
-    if(input='')or(input[1]='.')then writeln('Whoops!')
+    if(input='')or(input[1]='.')then writeln('‚¨‚Á‚Æ‚Æ!')
    end;  {of Format}