File Coverage

blib/lib/WE/Obj/Doc.pm
Criterion Covered Total %
statement 9 10 90.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 15 86.6


line stmt bran cond sub pod time code
1             # -*- perl -*-
2              
3             #
4             # $Id: Doc.pm,v 1.4 2003/12/16 15:21:23 eserte Exp $
5             # Author: Slaven Rezic
6             #
7             # Copyright (C) 2001 Online Office Berlin. All rights reserved.
8             # Copyright (C) 2002 Slaven Rezic.
9             # This is free software; you can redistribute it and/or modify it under the
10             # terms of the GNU General Public License, see the file COPYING.
11              
12             #
13             # Mail: slaven@rezic.de
14             # WWW: http://we-framework.sourceforge.net
15             #
16              
17             package WE::Obj::Doc;
18              
19 13     13   65 use base qw(WE::Obj::DocObj);
  13         25  
  13         7850  
20              
21 13     13   68 use strict;
  13         25  
  13         393  
22 13     13   63 use vars qw($VERSION);
  13         102  
  13         1095  
23             $VERSION = sprintf("%d.%02d", q$Revision: 1.4 $ =~ /(\d+)\.(\d+)/);
24              
25 0     0 1   sub instantiable { 1 }
26              
27             1;
28              
29             __END__