Re: Perlbug questions

[email protected] ((Richard Foley)) Sat, 14 Apr 2001 18:43:40 +0200
Newsgroups perl.bugmongers
Organization RFI
Message-ID <[email protected]>
"H.Merijn Brand" wrote:

> > >> Please send latest sql/current_db_structure and change sql/README (tell them/us
> > >> to use current_db_structure when starting fresh; don't refer to non-existing
> > >> files (insert_flags.sql)) and make it clear in the database snapshow *what*
> > >> version I'm dealing with!
> > >
Docs clarified in 2.61 - db creation has lagged behind recently

> > >What about changing "-Q" request to [email protected] to return
> > >current_db_structure.sql instead of "show ..." outpur for bugadmins? Maybe make
> > >it a preference option in the admin table.
> > >
current_db_structure.sql would be acceptable, but you shouldn't need it
:-)

> > >OTOH, with my latest -H output (2.23 ha ha), the options -E, -F, -G, -g, -I, -i,
> > >-J, -j, -K, -k, -M, -N, -O, -P, -T, -U, -V, -Y, -Z and -z are still free. We
> > >can claim -N (newest schema) to return the schema in SQL terms.
> >
Nope -N is a new NOTE - BTW we're on 2.61 (nearly...)

> > But the real answer is that programs shouldn't be hitting the database
> > directly, if they can find another way.
> >
> > Richard has put a very thourough OO interface into the system, which
> > abstracts away a lot of the database stuff.
> 
:-)

> I know, but so far my bugtk interface was *not* depending on whatever installed
> with Perlbug-x.xx, because I was unable to install Perlbug from the first place
> (it needs several web/net modules I have not installed, and do not want to
> install)
> 
You could always include a few duff module files:

# duff modules file:

	package Mail::Internet;
	return 1;

	package File::Spec;
	return 1;

	package HTML::Entities;
	return 1;

# end duff modules file

???

> Second - and more important - reason, is I want to get it working again (now
> please ;-), and *if* it works again, only then I want to have a look at the new
> interface. Richard has made (too) many changes for me to keep in sync.
> 
I was hoping most of them would make your life easier to develop
against.

	my $o_bug = Perlbug::Object::Bug->new();

	my @all_bugids = $o_bug->ids();

	my @patchids = $o_bug->read('20010502.002')->rel_ids('patch');

and so on...

-- 
Ciao
Richard Foley
Ciao - shorter than AufWiederSehen!