--- a/QScintilla/Lexers/LexerPerl.py	Sun Nov 13 19:14:57 2011 +0100
+++ b/QScintilla/Lexers/LexerPerl.py	Sun Nov 13 19:56:47 2011 +0100
@@ -39,6 +39,10 @@
             self.setFoldPODBlocks(Preferences.getEditor("PerlFoldPODBlocks"))
         except AttributeError:
             pass
+        try:
+            self.setFoldAtElse(Preferences.getEditor("PerlFoldAtElse"))
+        except AttributeError:
+            pass
     
     def autoCompletionWordSeparators(self):
         """