1. Kurt Miebach
  2. dragonfly-newlisp

Commits

Greg Slepak  committed a398644

another attempt

  • Participants
  • Parent commits 2d10aa9
  • Branches default

Comments (0)

Files changed (1)

File example-site/dragonfly-framework/dragonfly.lsp

View file
 (new Route 'Route.Static) (context Route.Static)
 
 (define (matches?)
-	(set 'chunks (parse QUERY_STRING {\?&} 0))
+	(set 'chunks (parse QUERY_STRING {[\?&]} 0))
 	(if (empty? chunks)
 		(push DF:DEFAULT_VIEW chunks))
 	(set 'path (set 'DF:_ (first chunks)))