HCoop
/
bpt
/
portal.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add delete links on poll pages
[bpt/portal.git]
/
poll.sml
diff --git
a/poll.sml
b/poll.sml
index
74fcaa9
..
34868cf
100644
(file)
--- a/
poll.sml
+++ b/
poll.sml
@@
-177,9
+177,9
@@
fun dateLtNow d =
fun canModify (poll : poll) =
Group.inGroupName "poll"
fun canModify (poll : poll) =
Group.inGroupName "poll"
- orelse (#usr poll = Init.getUserId()
- andalso (dateLtNow (#starts poll)
-
orelse not (#ready poll
)))
+ orelse (
(
#usr poll = Init.getUserId()
+
andalso (dateLtNow (#starts poll)
+
orelse not (#ready poll)
)))
fun requireCanModify poll =
if canModify poll then
fun requireCanModify poll =
if canModify poll then