UserPreferences.st
branchjv
changeset 18561 73656aba2c89
parent 18555 7cc0ec139c8d
parent 18557 cee27e3e432e
child 18642 793711fd33f5
equal deleted inserted replaced
18556:2c67b0fa6ff5 18561:73656aba2c89
  4037 
  4037 
  4038     (self at:#preloadedPackages ifAbsentPut:[Set new]) add:packageName.
  4038     (self at:#preloadedPackages ifAbsentPut:[Set new]) add:packageName.
  4039     Smalltalk loadPackage:packageName.
  4039     Smalltalk loadPackage:packageName.
  4040 
  4040 
  4041     "
  4041     "
       
  4042      UserPreferences current preloadedPackages
       
  4043 
  4042      UserPreferences current addPreloadedPackage:'stx:goodies/smallsense'
  4044      UserPreferences current addPreloadedPackage:'stx:goodies/smallsense'
  4043      UserPreferences current removePreloadedPackage:'stx:goodies/smallsense'
  4045      UserPreferences current removePreloadedPackage:'stx:goodies/smallsense'
  4044     "
  4046     "
  4045 !
  4047 !
  4046 
  4048 
  4078 
  4080 
  4079 removePreloadedPackage:packageName
  4081 removePreloadedPackage:packageName
  4080     "remove this from the set of preloaded packages.
  4082     "remove this from the set of preloaded packages.
  4081      This will be no longer be automatically loaded whenever the system starts"
  4083      This will be no longer be automatically loaded whenever the system starts"
  4082 
  4084 
  4083     (self at:#preloadedPackages ifAbsentPut:[Set new]) remove:packageName ifAbsent:[]
  4085     |preloaded|
  4084 
  4086 
  4085     "
  4087     preloaded := self at:#preloadedPackages ifAbsent:[nil].
       
  4088     preloaded notNil ifTrue:[
       
  4089         preloaded remove:packageName ifAbsent:[]
       
  4090     ].
       
  4091 
       
  4092     "
       
  4093      UserPreferences current preloadedPackages
       
  4094 
  4086      UserPreferences current addPreloadedPackage:'stx:goodies/smallsense'
  4095      UserPreferences current addPreloadedPackage:'stx:goodies/smallsense'
  4087      UserPreferences current removePreloadedPackage:'stx:goodies/smallsense'
  4096      UserPreferences current removePreloadedPackage:'stx:goodies/smallsense'
  4088     "
  4097     "
  4089 ! !
  4098 ! !
  4090 
  4099