equal
deleted
inserted
replaced
768 help |
768 help |
769 |filename| |
769 |filename| |
770 |
770 |
771 filename := self helpFilename. |
771 filename := self helpFilename. |
772 filename isNil ifTrue:[ |
772 filename isNil ifTrue:[ |
773 self warn:(self resources string:'Sorry - no Help available here.'). |
773 self warn:('Sorry - no Help available here.'). |
774 ^ self. |
774 ^ self. |
775 ]. |
775 ]. |
776 self withWaitCursorDo:[ |
776 self withWaitCursorDo:[ |
777 | file | |
777 | file | |
778 |
778 |
788 |
788 |
789 |
789 |
790 ]. |
790 ]. |
791 |
791 |
792 "Created: / 22-01-2013 / 20:39:07 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
792 "Created: / 22-01-2013 / 20:39:07 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
793 "Modified: / 09-08-2018 / 15:30:52 / Claus Gittinger" |
793 ! |
794 ! |
794 |
795 |
795 helpFilename |
796 helpFilename |
796 "subclasses must return the relative name of a helpFile |
797 "subclasses must return the relative name of a helpFile |
797 in the doc/online/<language>/help directory. |
798 in the doc/online/<language>/help directory. |