fix Lisp code and use default port

festival/festival-init.scm

@@ -4,7 +4,7 @@
 
 ;;  server configuration
 (set! server_log_file      '@l_prefix@/var/festival/festival.log)
-(set! server_port          '12345)
+(set! server_port          '1314)
 (set! server_access_list   '("localhost\\.example\\.com" "localhost"))
 (set! server_deny_list     nil)
 (set! server_passwd        nil)

festival/festival.patch

@@ -44,7 +44,7 @@ Index: festival/lib/init.scm
  
 +;;;  OpenPKG configuration hook 1
 +(if (probe_file "@l_prefix@/etc/festival/festival-vars.scm")
-+    (load "@l_prefix@/etc/festival/festival-vars.scm")))
++    (load "@l_prefix@/etc/festival/festival-vars.scm"))
 +
  ;;; CSTR siod extensions
  (require 'cstr)
@@ -55,7 +55,7 @@ Index: festival/lib/init.scm
  
 +;;;  OpenPKG configuration hook 2
 +(if (probe_file "@l_prefix@/etc/festival/festival-init.scm")
-+    (load "@l_prefix@/etc/festival/festival-init.scm")))
++    (load "@l_prefix@/etc/festival/festival-init.scm"))
 +
  ;;;  User initialization, if a user has a personal customization
  ;;;  file loaded it