From: Jan T. <de...@us...> - 2004-03-22 01:01:42
|
Update of /cvsroot/net-script/netscript2/src/perl/XML/DAL In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6047 Modified Files: DAL.pm XMLDOM2DAL.pm Log Message: * added line number to DAL Index: DAL.pm =================================================================== RCS file: /cvsroot/net-script/netscript2/src/perl/XML/DAL/DAL.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** DAL.pm 31 May 2003 22:39:34 -0000 1.2 --- DAL.pm 22 Mar 2004 00:51:30 -0000 1.3 *************** *** 80,83 **** --- 80,93 ---- } + + #/** + # Returns the line number of the given node. + # @param the node whichs line number should be returned. + # @return the line number of the node. + #*/ + sub getLine { + + } + # ---------------- Node Type Checking -------------------- *************** *** 400,402 **** --- 410,414 ---- + + 1; Index: XMLDOM2DAL.pm =================================================================== RCS file: /cvsroot/net-script/netscript2/src/perl/XML/DAL/XMLDOM2DAL.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** XMLDOM2DAL.pm 31 May 2003 22:39:34 -0000 1.2 --- XMLDOM2DAL.pm 22 Mar 2004 00:51:30 -0000 1.3 *************** *** 47,50 **** --- 47,54 ---- } + sub getLine { + my ( $this, $node ) = @_; + $node -> getLine(); + } # ---------------- Node Type Checking -------------------- |