Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
gendl
gendl
Commits
2383abc4
Commit
2383abc4
authored
Jun 15, 2013
by
Dave Cooper
Browse files
fixed gdlajax updates for sites published with shared-publish
parent
807fa05c
Changes
1
Hide whitespace changes
Inline
Side-by-side
gwl/ajax/source/ajax.lisp
View file @
2383abc4
...
...
@@ -90,7 +90,12 @@
(
plist-values
encoded-fields
)))))
(
raw-fields
(
getf
query-plist
:|raw-fields|
))
(
iid
(
getf
plist
:|iid|
))
(
self
(
first
(
gethash
(
make-keyword
iid
)
gwl:*instance-hash-table*
)))
(
self
(
progn
(
print-variables
iid
)
(
print-hash
gwl:*instance-hash-table*
)
(
first
(
gethash
(
make-keyword-sensitive
iid
)
gwl:*instance-hash-table*
))))
(
foo
(
print-variables
self
))
(
self
(
or
self
(
restore-from-snap
iid
)))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment