[glibmm/gmmproc-refactor] Slightly update girtest script.



commit 80a6efce2d7311901bbd4ea0ff9548bac23f5099
Author: Krzesimir Nowak <qdlacz gmail com>
Date:   Mon Nov 21 12:57:57 2011 +0100

    Slightly update girtest script.

 tools/pm/girtest.pl |   10 +++++++++-
 1 files changed, 9 insertions(+), 1 deletions(-)
---
diff --git a/tools/pm/girtest.pl b/tools/pm/girtest.pl
index 2fa56af..7c02463 100755
--- a/tools/pm/girtest.pl
+++ b/tools/pm/girtest.pl
@@ -1,4 +1,5 @@
-#!/usr/bin/env perl
+#!/usr/bin/perl
+# -*- mode: perl; perl-indent-level: 2; indent-tabs-mode: nil -*-
 
 use strict;
 use warnings;
@@ -10,3 +11,10 @@ require Gir::Parser;
 my $gir_parser = Gir::Parser->new ();
 
 $gir_parser->parse_file ('GtkSource-3.0.gir');
+
+my $repositories = $gir_parser->get_repositories;
+
+foreach my $repository (sort keys %{$repositories->{'repositories'}})
+{
+  print STDOUT $repository . "\n";
+}



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]