Skip to content
Browse files

use the channel page name (doh)

  • Loading branch information...
1 parent 041f78d commit a22c4f9479cf8b92b63ba5dcc6715196bd6d1fe4 @vii committed May 26, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/webapp/channel.lisp
View
2 src/webapp/channel.lisp
@@ -104,7 +104,7 @@
(when original-hangup-handler
(apply original-hangup-handler args)))))))))))
-(defun register-channel-page (&optional (url (site-action-page-name (current-site))))
+(defun register-channel-page (&optional (url (site-channel-page-name (current-site))))
(dispatcher-register-path (site-dispatcher (current-site)) url #'channel-respond-page))
(my-defun channel 'object-to-ml ()

0 comments on commit a22c4f9

Please sign in to comment.
Something went wrong with that request. Please try again.