diff --git a/tests/webtbs/tw2911.pp b/tests/webtbs/tw2911.pp
index 81fd72a709..1614ba86d9 100644
--- a/tests/webtbs/tw2911.pp
+++ b/tests/webtbs/tw2911.pp
@@ -4,9 +4,9 @@
 { Submitted by "Chris Hilder" on  2004-01-19 }
 { e-mail: cj.hilder@astronomyinyourhands.com }
 program bug_demo;
-{$LONGSTRINGS ON}
 
 {$ifdef fpc}{$Mode objfpc}{$endif}
+{$LONGSTRINGS ON}
 
 type
         RecordWithStrings =