Merge jv
authorMerge Script
Fri, 10 Jul 2015 07:00:02 +0200
branchjv
changeset 15740 947766bcf789
parent 15738 b8319952027b (current diff)
parent 15739 b8fb58295131 (diff)
child 15743 cd30f981f1c4
Merge
extensions.st
--- a/extensions.st	Wed Jul 08 07:02:00 2015 +0200
+++ b/extensions.st	Fri Jul 10 07:00:02 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:libtool' }"!
 
 !AbstractSyntaxHighlighter class methodsFor:'api highlighting'!
@@ -654,6 +656,9 @@
     "extra (pseudo instvar) entries to be shown in an inspector."
 
     ^ super inspectorExtraAttributes
+        add:'-day' -> [ self day printString ];
+        add:'-month' -> [ self month printString ];
+        add:'-year' -> [ self year printString ];
         add:'-dayInWeek' -> [ self dayInWeek printString , ' "', self dayOfWeekName , '"' ];
         add:'-dayInYear' -> [ self dayInYear ];
         add:'-daysInMonth' -> [ self daysInMonth ];