Fix error when there are no products
This commit is contained in:
parent
aa26e70fbd
commit
f342714430
1 changed files with 1 additions and 1 deletions
|
@ -36,7 +36,7 @@ cart([Name|Items]) -->
|
||||||
|
|
||||||
products_view(_Request) :-
|
products_view(_Request) :-
|
||||||
http_session_id(SessionId),
|
http_session_id(SessionId),
|
||||||
bagof(product(X, Y), product(X, Y), Products),
|
(bagof(product(X, Y), product(X, Y), Products); Products = []),
|
||||||
(bagof(Name, cart_entry(SessionId, Name), CartEntries); CartEntries = []),
|
(bagof(Name, cart_entry(SessionId, Name), CartEntries); CartEntries = []),
|
||||||
reply_html_page(
|
reply_html_page(
|
||||||
[
|
[
|
||||||
|
|
Loading…
Reference in a new issue