1 "{ Package: 'stx:libscm/mercurial' }"

     2 

     3 Object subclass:#HGCommit

     4 	instanceVariableNames:'id user timestamp files message parent1 parent2'

     5 	classVariableNames:''

     6 	poolDictionaries:''

     7 	category:'SCM-Mercurial-Core'

     8 !

     9 

    10 

    11 !HGCommit class methodsFor:'instance creation'!

    12 

    13 new

    14     "return an initialized instance"

    15 

    16     ^ self basicNew initialize.

    17 ! !

    18 

    19 !HGCommit methodsFor:'initialization'!

    20 

    21 initialize

    22     "Invoked when a new instance is created."

    23 

    24     "/ please change as required (and remove this comment)

    25     "/ id := nil.

    26     "/ user := nil.

    27     "/ timestamp := nil.

    28     "/ files := nil.

    29     "/ message := nil.

    30 

    31 

    32     "/ super initialize.   -- commented since inherited method does nothing

    33 

    34     "Modified: / 19-10-2012 / 16:08:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"

    35 ! !

    36 

    37 !HGCommit class methodsFor:'documentation'!

    38 

    39 version_SVN

    40     ^ '$Id::                                                                                                                        $'

    41 ! !