andrewalker

#!/usr/bin/env perl
use warnings;
use strict;

# usage:
# mplayer $(perl watch.pl http://ics.webcast.uwex.edu/mediasite/Viewer/?peid=ceecb7a37e3f4dbbb13e7f5cc9f513291d)

my @parts = (shift =~ /\?peid=(\w{8})(\w{4})(\w{4})(\w{4})(\w{12})/);
local $" = '-';

andrewalker

 * Big topics (design and hard to solve issues)
     - Catalyst::Model::DBIC::Schema is broken because we build the service too early,
       causing the COMPONENT method to be called early, breaking components which
       build other components.
       this:
             sub COMPONENT {
                 ...
                 *${appclass}::Model::TopLevel::GENERATED::ACCEPT_CONTEXT = sub { ... };
                 ...
             }

andrewalker

so, we got this service subclass doing ACCEPT_CONTEXT and COMPONENT, right?
or two of them, or whatever
instances of that are generated while building the "default" container for your app
based on the components in your lib/ and whatnot
what you want to know is how to:
    a) configure additional services in that container 
        super simple
        container $default_container => as { more services };
    b) make component services depend on that
        trickier, as i can't think of a nice way to "amend" service definitions