Here is repository with fixed clsql-fluid https://github.com/html/clsql-fluid
среда, 30 ноября 2011 г., 11:54:52 UTC+2 пользователь Farzad Bekran написал: > > 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 > I'm using sbcl and (setf sb-impl::*default-external-format* :utf-8) helped me. > 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 unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. To post to this group, send email to [email protected]. Visit this group at http://groups.google.com/group/weblocks?hl=en. For more options, visit https://groups.google.com/groups/opt_out.
