Ok, so far I have Managed to fix the problem by cloning the fluid and weblocks and modifying some source, now the quiestion is: is there a way to use weblocks with non english languages, like I need to change the caption of the fields of the form view widget or things like that.
thanks On Nov 28, 5:42 am, Farzad Bekran <[email protected]> wrote: > Hi > When I try to (weblocks-clsql-demo:start-weblocks-clsql-demo :debug > t :port 80) > I get this error: > > The function CLSQL-SYS::RELEASE-TO-CONN-POOL is undefined. > [Condition of type UNDEFINED-FUNCTION] > > but it seems that the function is renamed to: clsql-sys:database- > release-to-conn-pool > > any ideas about fixing this? > > Backtrace: > 0: (CLSQL-SYS::MAKE-FLUID-DATABASE-FLUID) > 1: ((SB-PCL::FAST-METHOD SHARED-INITIALIZE (SB-PCL::SLOT-OBJECT > T)) ..) > 2: ((SB-PCL::EMF INITIALIZE-INSTANCE) ..) > 3: ((SB-PCL::FAST-METHOD MAKE-INSTANCE (CLASS)) #<unused argument> > #<unused argument> #<CLSQL-SYS::SUB-DB-FORWARDING-CLASS CLSQL- > SYS:FLUID-DATABASE> #<unavailable &REST argument>) > 4: ((SB-PCL::FAST-METHOD WEBLOCKS:OPEN-STORE ((EQL :CLSQL))) > #<unused argument> #<unused argument> #<unused argument> ("localhost" > "Shopping" "root" "dante2") :DATABASE-TYPE :MYSQL) > 5: ((LAMBDA (WEBLOCKS::STORE-NAME)) WEBLOCKS-CLSQL-DEMO::*SQL- > STORE*) > 6: (WEBLOCKS:OPEN-STORES) > 7: ((SB-PCL::EMF WEBLOCKS:INITIALIZE-WEBAPP) #<unavailable argument> > #<unavailable argument> #<WEBLOCKS-CLSQL-DEMO::WEBLOCKS-CLSQL-DEMO > {BA87DA1}>) > 8: (WEBLOCKS:START-WEBAPP WEBLOCKS-CLSQL-DEMO::WEBLOCKS-CLSQL- > DEMO :DEBUG T) > 9: (WEBLOCKS:START-WEBLOCKS :DEBUG T :PORT 80) > 10: (SB-INT:SIMPLE-EVAL-IN-LEXENV (WEBLOCKS-CLSQL-DEMO:START-WEBLOCKS- > CLSQL-DEMO :DEBUG T :PORT 80) #<NULL-LEXENV>) > 11: (EVAL (WEBLOCKS-CLSQL-DEMO:START-WEBLOCKS-CLSQL-DEMO :DEBUG > T :PORT 80)) > 12: (SWANK::EVAL-REGION "(weblocks-clsql-demo:start-weblocks-clsql- > demo :Debug t :port 80)\n") > 13: ((LAMBDA ())) > 14: (SWANK::TRACK-PACKAGE #<CLOSURE (LAMBDA #) {C4B8225}>) > 15: (SWANK::CALL-WITH-RETRY-RESTART "Retry SLIME REPL evaluation > request." #<CLOSURE (LAMBDA #) {C4B81B5}>) > 16: (SWANK::CALL-WITH-BUFFER-SYNTAX NIL #<CLOSURE (LAMBDA #) {C4B819D}>) > > 17: (SWANK::REPL-EVAL "(weblocks-clsql-demo:start-weblocks-clsql- > demo :Debug t :port 80)\n") > 18: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:LISTENER-EVAL "(weblocks- > clsql-demo:start-weblocks-clsql-demo :Debug t :port 80) ..) > 19: (EVAL (SWANK:LISTENER-EVAL "(weblocks-clsql-demo:start-weblocks- > clsql-demo :Debug t :port 80) ..) > 20: (SWANK:EVAL-FOR-EMACS (SWANK:LISTENER-EVAL "(weblocks-clsql- > demo:start-weblocks-clsql-demo :Debug t :port 80)\n") "COMMON-LISP- > USER" 22) > 21: (SWANK::PROCESS-REQUESTS NIL) > 22: ((LAMBDA ())) > 23: ((LAMBDA ())) > 24: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK- > DEBUGGER-HOOK> #<CLOSURE (LAMBDA #) {BCB30C5}>) > 25: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK) #<FUNCTION > SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA #) {BCB30C5}>) > 26: (SWANK::CALL-WITH-BINDINGS ((*STANDARD-OUTPUT* . #) (*STANDARD- > INPUT* . #) (*TRACE-OUTPUT* . #) (*ERROR-OUTPUT* . #) (*DEBUG-IO* . #) > (*QUERY-IO* . #) ...) #<CLOSURE (LAMBDA #) {BCB30D5}>) > 27: (SWANK::HANDLE-REQUESTS #<SWANK::CONNECTION {B678871}> NIL) > 28: ((FLET #:WITHOUT-INTERRUPTS-BODY-[BLOCK405]410)) > 29: ((FLET SB-THREAD::WITH-MUTEX-THUNK)) > 30: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-MUTEX]309)) > 31: (SB-THREAD::CALL-WITH-MUTEX ..) > 32: (SB-THREAD::INITIAL-THREAD-FUNCTION) > 33: ("foreign function: call_into_lisp") > 34: ("foreign function: funcall0") > 35: ("foreign function: new_thread_trampoline") > 36: ("foreign function: #xB7FB6E99") -- You received this message because you are subscribed to the Google Groups "weblocks" group. To post to this group, send email to [email protected]. To unsubscribe from this group, send email to [email protected]. For more options, visit this group at http://groups.google.com/group/weblocks?hl=en.
