MenuEditor.st
changeset 699 7746185a3621
parent 686 6eabad89ebf6
child 703 5d0a14bdcc15
equal deleted inserted replaced
698:5bf234e0e451 699:7746185a3621
  1518 !
  1518 !
  1519 
  1519 
  1520 useHelpDictionary:aDictionary
  1520 useHelpDictionary:aDictionary
  1521 
  1521 
  1522     self noteBookView.
  1522     self noteBookView.
  1523     self helpTool dictionary:aDictionary
  1523     self helpTool helpSpecFrom: specClass
  1524 ! !
  1524 ! !
  1525 
  1525 
  1526 !MenuEditor methodsFor:'aspects'!
  1526 !MenuEditor methodsFor:'aspects'!
  1527 
  1527 
  1528 hasAnySingleSelection
  1528 hasAnySingleSelection
  1927             , '\\'.
  1927             , '\\'.
  1928 
  1928 
  1929     code := code withCRs.
  1929     code := code withCRs.
  1930     (ReadStream on:code) fileIn.
  1930     (ReadStream on:code) fileIn.
  1931 
  1931 
  1932     self isStandAlone ifTrue:[
  1932     self helpTool installHelpSpecInto:self specClass.
  1933         self helpTool installHelpSpecInto:(self specClass)
  1933 
  1934     ].
       
  1935     self updateHistory.
  1934     self updateHistory.
  1936     hasSaved := true.
  1935     hasSaved := true.
  1937     modified := false.
  1936     modified := false.
  1938 
  1937 
  1939 !
  1938 !