/[libconf]/libconf/perl-Libconf/Glueconf/test/XF86Config/test.pl
ViewVC logotype

Diff of /libconf/perl-Libconf/Glueconf/test/XF86Config/test.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by dams, Thu Apr 10 19:18:24 2003 UTC revision 1.5 by dams, Fri Apr 11 18:58:56 2003 UTC
# Line 5  use Data::Dumper; Line 5  use Data::Dumper;
5    
6  my $xf86config = new Libconf::Glueconf::XF86Config(XF86Config);  my $xf86config = new Libconf::Glueconf::XF86Config(XF86Config);
7    
8  # #print Data::Dumper->Dump([$xf86config], ['plop']) . "\n";  print Data::Dumper->Dump([$xf86config], ['plop']) . "\n";
9  # my $p = $xf86config->{ServerLayout}{Identifier};  # my $p = $xf86config->{ServerLayout}{Identifier};
10  # #print Data::Dumper->Dump([$p], ['p']) . "\n";  # #print Data::Dumper->Dump([$p], ['p']) . "\n";
11    
# Line 18  my $xf86config = new Libconf::Glueconf:: Line 18  my $xf86config = new Libconf::Glueconf::
18  # }  # }
19    
20    
21  my $p = $xf86config->{InputDevice};  #my $p = $xf86config->{InputDevice};
22    
23  foreach (keys %{$p}) {  #foreach (keys %{$p}) {
24      print " - $_\n";  #    print " - $_\n";
25  }  #}
26  #print Data::Dumper->Dump([$files_section], ['files']) . "\n";  #print Data::Dumper->Dump([$files_section], ['files']) . "\n";
27    
28    

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26