head	1.2;
access;
symbols;
locks; strict;
comment	@# @;


1.2
date	2000.08.21.20.47.17;	author dwitch;	state Exp;
branches;
next	1.1;

1.1
date	2000.08.20.23.15.33;	author dwitch;	state Exp;
branches;
next	;


desc
@@


1.2
log
@- Renamed DebBugs:: perl hierarchy to Debbugs::
@
text
@#!/usr/bin/perl

use Gnome;
use Gtk;
use Debbugs::DMBT::GUI;

init Gnome "DMBT", "0.0";

# FIXME: filename should be selectable  
$gui = new Debbugs::DMBT::GUI;

$gui->{DMBT}->init_ldap ('bugs.debian.org', 35567, 'ou=Bugs,o=Debian Project,c=US');
		    
signal_connect $gui 'delete_event', sub { Gtk->main_quit; return 0 };

show_all $gui;

main Gtk;
@


1.1
log
@Initial revision
@
text
@d5 1
a5 1
use DebBugs::DMBT::GUI;
d10 1
a10 1
$gui = new DebBugs::DMBT::GUI;
@
