Tools__Tag.st
changeset 11803 3025c4948991
parent 11438 d7caa3c8de40
child 12401 4714b9640528
child 12709 b6a7b058e665
equal deleted inserted replaced
11802:79d02540b382 11803:3025c4948991
    18 	classVariableNames:''
    18 	classVariableNames:''
    19 	poolDictionaries:''
    19 	poolDictionaries:''
    20 	category:'Interface-Tools-File-Tags'
    20 	category:'Interface-Tools-File-Tags'
    21 !
    21 !
    22 
    22 
       
    23 Tag subclass:#TElement
       
    24 	instanceVariableNames:''
       
    25 	classVariableNames:''
       
    26 	poolDictionaries:''
       
    27 	privateIn:Tag
       
    28 !
       
    29 
    23 Tag subclass:#TClass
    30 Tag subclass:#TClass
    24 	instanceVariableNames:''
    31 	instanceVariableNames:''
    25 	classVariableNames:''
    32 	classVariableNames:''
    26 	poolDictionaries:''
    33 	poolDictionaries:''
    27 	privateIn:Tag
    34 	privateIn:Tag
    32 	classVariableNames:''
    39 	classVariableNames:''
    33 	poolDictionaries:''
    40 	poolDictionaries:''
    34 	privateIn:Tag
    41 	privateIn:Tag
    35 !
    42 !
    36 
    43 
    37 Tag subclass:#TElement
    44 Tag::TElement subclass:#TAnchorElement
    38 	instanceVariableNames:''
    45 	instanceVariableNames:''
    39 	classVariableNames:''
    46 	classVariableNames:''
    40 	poolDictionaries:''
    47 	poolDictionaries:''
    41 	privateIn:Tag
    48 	privateIn:Tag
    42 !
    49 !
    60 	classVariableNames:''
    67 	classVariableNames:''
    61 	poolDictionaries:''
    68 	poolDictionaries:''
    62 	privateIn:Tag
    69 	privateIn:Tag
    63 !
    70 !
    64 
    71 
       
    72 Tag::TElement subclass:#TFormElement
       
    73 	instanceVariableNames:''
       
    74 	classVariableNames:''
       
    75 	poolDictionaries:''
       
    76 	privateIn:Tag
       
    77 !
       
    78 
    65 Tag subclass:#TFunction
    79 Tag subclass:#TFunction
       
    80 	instanceVariableNames:''
       
    81 	classVariableNames:''
       
    82 	poolDictionaries:''
       
    83 	privateIn:Tag
       
    84 !
       
    85 
       
    86 Tag::TElement subclass:#THeaderElement
    66 	instanceVariableNames:''
    87 	instanceVariableNames:''
    67 	classVariableNames:''
    88 	classVariableNames:''
    68 	poolDictionaries:''
    89 	poolDictionaries:''
    69 	privateIn:Tag
    90 	privateIn:Tag
    70 !
    91 !
   600     ^ false
   621     ^ false
   601 
   622 
   602 
   623 
   603 ! !
   624 ! !
   604 
   625 
       
   626 !Tag::TElement class methodsFor:'accessing'!
       
   627 
       
   628 typeIdentifier
       
   629     ^ 'e'
       
   630 
       
   631     "Created: / 20-04-2011 / 18:52:31 / cg"
       
   632 ! !
       
   633 
       
   634 !Tag::TElement class methodsFor:'documentation'!
       
   635 
       
   636 documentation
       
   637 "
       
   638     an element (as in HTML)
       
   639 "
       
   640 ! !
       
   641 
       
   642 !Tag::TElement methodsFor:'accessing'!
       
   643 
       
   644 typeIdentifierInList
       
   645     ^ 'e'
       
   646 
       
   647     "Created: / 20-04-2011 / 18:53:49 / cg"
       
   648 !
       
   649 
       
   650 typeString
       
   651     ^ 'element'
       
   652 
       
   653     "Created: / 20-04-2011 / 18:53:29 / cg"
       
   654 ! !
       
   655 
       
   656 !Tag::TElement methodsFor:'testing'!
       
   657 
       
   658 isElementTag
       
   659     "return true, if this is an element tag 
       
   660     "
       
   661     ^ true
       
   662 
       
   663     "Created: / 20-04-2011 / 18:53:16 / cg"
       
   664 ! !
       
   665 
   605 !Tag::TClass class methodsFor:'accessing'!
   666 !Tag::TClass class methodsFor:'accessing'!
   606 
   667 
   607 typeIdentifier
   668 typeIdentifier
   608     ^ 'C'
   669     ^ 'C'
   609 
   670 
   675     ^ true
   736     ^ true
   676 
   737 
   677     "Created: / 08-05-2011 / 10:06:03 / cg"
   738     "Created: / 08-05-2011 / 10:06:03 / cg"
   678 ! !
   739 ! !
   679 
   740 
   680 !Tag::TElement class methodsFor:'accessing'!
   741 !Tag::TAnchorElement class methodsFor:'accessing'!
   681 
   742 
   682 typeIdentifier
   743 typeIdentifier
   683     ^ 'e'
   744     ^ 'a'
   684 
   745 
   685     "Created: / 20-04-2011 / 18:52:31 / cg"
   746     "Created: / 20-04-2011 / 18:52:31 / cg"
   686 ! !
   747 ! !
   687 
   748 
   688 !Tag::TElement class methodsFor:'documentation'!
   749 !Tag::TAnchorElement class methodsFor:'documentation'!
   689 
   750 
   690 documentation
   751 documentation
   691 "
   752 "
   692     an element (as in HTML)
   753     an anchor element (in HTML)
   693 "
   754 "
   694 ! !
   755 ! !
   695 
   756 
   696 !Tag::TElement methodsFor:'accessing'!
   757 !Tag::TAnchorElement methodsFor:'accessing'!
   697 
   758 
   698 typeIdentifierInList
   759 typeIdentifierInList
   699     ^ 'e'
   760     ^ 'a'
   700 
   761 
   701     "Created: / 20-04-2011 / 18:53:49 / cg"
   762     "Created: / 20-04-2011 / 18:53:49 / cg"
   702 !
   763 !
   703 
   764 
   704 typeString
   765 typeString
   705     ^ 'element'
   766     ^ 'anchor element'
   706 
   767 
   707     "Created: / 20-04-2011 / 18:53:29 / cg"
   768     "Created: / 20-04-2011 / 18:53:29 / cg"
   708 ! !
       
   709 
       
   710 !Tag::TElement methodsFor:'testing'!
       
   711 
       
   712 isElementTag
       
   713     "return true, if this is an element tag 
       
   714     "
       
   715     ^ true
       
   716 
       
   717     "Created: / 20-04-2011 / 18:53:16 / cg"
       
   718 ! !
   769 ! !
   719 
   770 
   720 !Tag::TEnum class methodsFor:'accessing'!
   771 !Tag::TEnum class methodsFor:'accessing'!
   721 
   772 
   722 typeIdentifier
   773 typeIdentifier
   788     ^ true
   839     ^ true
   789 
   840 
   790 
   841 
   791 ! !
   842 ! !
   792 
   843 
       
   844 !Tag::TFormElement class methodsFor:'accessing'!
       
   845 
       
   846 typeIdentifier
       
   847     ^ 'f'
       
   848 
       
   849     "Created: / 20-04-2011 / 18:52:31 / cg"
       
   850 ! !
       
   851 
       
   852 !Tag::TFormElement class methodsFor:'documentation'!
       
   853 
       
   854 documentation
       
   855 "
       
   856     a form element (in HTML)
       
   857 "
       
   858 ! !
       
   859 
       
   860 !Tag::TFormElement methodsFor:'accessing'!
       
   861 
       
   862 typeIdentifierInList
       
   863     ^ 'f'
       
   864 
       
   865     "Created: / 20-04-2011 / 18:53:49 / cg"
       
   866 !
       
   867 
       
   868 typeString
       
   869     ^ 'form element'
       
   870 
       
   871     "Created: / 20-04-2011 / 18:53:29 / cg"
       
   872 ! !
       
   873 
   793 !Tag::TFunction class methodsFor:'accessing'!
   874 !Tag::TFunction class methodsFor:'accessing'!
   794 
   875 
   795 typeIdentifier
   876 typeIdentifier
   796     ^ 'F'
   877     ^ 'F'
   797 
   878 
   820     ^ true
   901     ^ true
   821 
   902 
   822 
   903 
   823 ! !
   904 ! !
   824 
   905 
       
   906 !Tag::THeaderElement class methodsFor:'accessing'!
       
   907 
       
   908 typeIdentifier
       
   909     ^ 'h'
       
   910 
       
   911     "Created: / 20-04-2011 / 18:52:31 / cg"
       
   912 ! !
       
   913 
       
   914 !Tag::THeaderElement class methodsFor:'documentation'!
       
   915 
       
   916 documentation
       
   917 "
       
   918     a header element (in HTML)
       
   919 "
       
   920 ! !
       
   921 
       
   922 !Tag::THeaderElement methodsFor:'accessing'!
       
   923 
       
   924 typeIdentifierInList
       
   925     ^ 'h'
       
   926 
       
   927     "Created: / 20-04-2011 / 18:53:49 / cg"
       
   928 !
       
   929 
       
   930 typeString
       
   931     ^ 'header element'
       
   932 
       
   933     "Created: / 20-04-2011 / 18:53:29 / cg"
       
   934 ! !
       
   935 
   825 !Tag::TInterface class methodsFor:'accessing'!
   936 !Tag::TInterface class methodsFor:'accessing'!
   826 
   937 
   827 typeIdentifier
   938 typeIdentifier
   828     ^ 'I'
   939     ^ 'I'
   829 
   940 
  1256 ! !
  1367 ! !
  1257 
  1368 
  1258 !Tag class methodsFor:'documentation'!
  1369 !Tag class methodsFor:'documentation'!
  1259 
  1370 
  1260 version_CVS
  1371 version_CVS
  1261     ^ '$Header: /cvs/stx/stx/libtool/Tools__Tag.st,v 1.5 2012-03-17 10:17:46 cg Exp $'
  1372     ^ '$Header: /cvs/stx/stx/libtool/Tools__Tag.st,v 1.6 2012-09-12 20:42:58 cg Exp $'
  1262 !
  1373 !
  1263 
  1374 
  1264 version_SVN
  1375 version_SVN
  1265     ^ '§Id§'
  1376     ^ '§Id§'
  1266 ! !
  1377 ! !