05:29:26 <stepkut> synthea: dice 3d6
05:29:37 <stepkut> synthea71: ?dice 3d6
05:30:10 <stepkut> synthea71: #dice 3d6
05:30:13 <stepkut> #dice 3d6
05:30:13 <synthea71> You rolled 3 6-sided dice with a +0 modifier: [1,6,2] => 9
05:30:37 <stepkut> \o/
22:45:07 <KBme> hi
22:45:24 <KBme> I want to check the url of the page the user is looking at
22:45:47 <KBme> I need to check if the referrer and the current url are the same, and act accordingly
22:46:01 <KBme> I got the referrer, now I need to get the current url …
22:46:30 <stepkut> one moment
22:46:34 <KBme> simplest would be if it were a string in the form "http://host:port/path"
22:47:21 <KBme> I got to the Request type, and that has the info, but how do I get the Request?
22:47:49 <stepkut> askRq
22:47:59 <stepkut> do uri <- rqUri <$> askRq
22:48:08 <KBme> ah
22:49:43 <KBme> thanks
22:50:20 <stepkut> no problem!
22:56:53 <KBme> stepcut, ok, there is a problem ☺
22:57:01 <stepkut> :(
22:57:19 <KBme> why can't I use rqUri from inside my monad?
22:57:45 <stepkut> you probably needed 'lift' or you need to add a ServerMonad instance
22:58:14 <KBme> I have a servermonad instance for my monad…or at least it derives the servermonad class
22:58:35 <KBme> I guess I need lift
22:59:15 <stepkut> hmm
22:59:23 <stepkut> that does not make sense
22:59:31 <stepkut> what error do you get?
23:00:05 <KBme> ummm
23:00:58 <KBme>     Couldn't match expected type `mystatemonad t0'
23:00:58 <KBme>                 with actual type `String'
23:01:03 <KBme> with
23:01:09 <KBme> uri ← HST.rqUri HSM.askRq
23:01:43 <KBme> yeah…I didn't use <$>
23:02:49 <stepkut> :)
23:03:01 <KBme> what the hell does it do?
23:03:08 <KBme> it worked with <$> ☺
23:03:21 <stepkut> same thing as fmap
23:03:27 <stepkut> ?type <$>
23:03:28 <lambdabot> parse error on input `<$>'
23:03:30 <KBme> yep
23:03:33 <KBme> hmm interesting
23:03:36 <stepkut> ?info <$>
23:03:36 <lambdabot> (<$>)
23:03:48 <stepkut> ?info (<$>)
23:03:48 <lambdabot> (<$>)
23:03:54 <stepkut> ?info fmap
23:03:54 <lambdabot> fmap
23:03:57 <stepkut> hmm
23:04:01 <stepkut> ?type fmap
23:04:02 <lambdabot> Functor f => (a -> b) -> f a -> f b
23:04:09 <stepkut> ?type (<?>)
23:04:11 <lambdabot>     Not in scope: `<?>'
23:04:11 <lambdabot>     Perhaps you meant one of these:
23:04:11 <lambdabot>       `<>' (imported from Data.Monoid),
23:04:18 <stepkut> ?type (<$>)
23:04:19 <lambdabot> Functor f => (a -> b) -> f a -> f b
23:04:23 <KBme> stepcut, uh this just gives me "/path"
23:04:41 <KBme> is there no way to get "http://host:port/path" ?
23:04:51 <stepkut> you would need to construct that
23:05:07 <stepkut> it is not found in that form in the actually data sent by the protocol
23:05:30 <KBme> hmm
23:05:41 <KBme> damn
23:07:43 <stepkut> are you listening on more than one port/host?
23:37:19 <KBme> nope
23:37:31 <KBme> but I guess the referrer could be from an other host
23:37:44 <KBme> although in this case I don't really want to handle that case