Ignore:
Timestamp:
Jan 14, 2018, 6:56:30 PM (7 years ago)
Author:
Andreas Schnellbacher
Message:
File:
1 edited

Legend:

Unmodified
Added
Removed

  • TabularUnified trunk/src/netlabs/macros/modeexec.e

    r2831 r2869  
    279279
    280280   KeyPath = '\NEPMD\User\KeywordHighlighting\AutoRefresh'
    281    refresh_on = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     281   refresh_on = QueryConfigKey( KeyPath)
    282282   if refresh_on then
    283283      if loadstate then  -- during file loading
    … …  
    291291
    292292   KeyPath = '\NEPMD\User\KeywordHighlighting'
    293    default_on = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     293   default_on = QueryConfigKey( KeyPath)
    294294
    295295   getfileid fid
    … …  
    797797      if loadstate then
    798798         KeyPath = '\NEPMD\User\KeywordHighlighting\AutoRefresh'
    799          refresh_on = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     799         refresh_on = QueryConfigKey( KeyPath)
    800800         if refresh_on then
    801801            CheckFlag = GetHiliteCheckFlag(Mode)
    … …  
    806806   KeyPath = '\NEPMD\User\KeywordHighlighting' -- for default value if arg1 = 'DEFAULT' or empty
    807807   if arg1 = 'DEFAULT' then
    808       on = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     808      on = QueryConfigKey( KeyPath)
    809809   elseif arg1 = 0 then
    810810      on = 0
    … …  
    10291029   universal loadstate
    10301030   universal expand_on
    1031    universal nepmd_hini
    10321031   arg1 = upcase(arg(1))
    10331032   if arg1 = '' | arg1 = 'DEFAULT' then
    10341033      KeyPath = '\NEPMD\User\SyntaxExpansion'
    1035       on = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     1034      on = QueryConfigKey( KeyPath)
    10361035      if on then
    10371036         ExpandMode = GetMode()
    … …  
    10761075   universal loadstate
    10771076   universal matchtab_on
    1078    universal nepmd_hini
    10791077   arg1 = upcase(arg(1))
    10801078   if arg1 = '' | arg1 = 'DEFAULT' then
    10811079      KeyPath = '\NEPMD\User\Keys\Tab\MatchTab'
    1082       on = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     1080      on = QueryConfigKey( KeyPath)
    10831081   elseif wordpos( arg1, '0 OFF') then
    10841082      on = 0
    … …  
    11021100defc SetEditOptions
    11031101   universal default_edit_options
    1104    universal nepmd_hini
    11051102   arg1 = upcase(arg(1))
    11061103   if arg1 = '' | arg1 = 'DEFAULT' then
    11071104      KeyPath = '\NEPMD\User\Edit\DefaultOptions'
    1108       new = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     1105      new = QueryConfigKey( KeyPath)
    11091106   else
    11101107      new = arg(1)
    … …  
    11181115defc SetSaveOptions
    11191116   universal default_save_options
    1120    universal nepmd_hini
    11211117   arg1 = upcase(arg(1))
    11221118   if arg1 = '' | arg1 = 'DEFAULT' then
    11231119      KeyPath = '\NEPMD\User\Save\DefaultOptions'
    1124       new = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     1120      new = QueryConfigKey( KeyPath)
    11251121   else
    11261122      new = arg(1)
    … …  
    11341130defc SetSearchOptions
    11351131   universal default_search_options
    1136    universal nepmd_hini
    11371132   arg1 = upcase(arg(1))
    11381133   if arg1 = '' | arg1 = 'DEFAULT' then
    11391134      KeyPath = '\NEPMD\User\Search\DefaultOptions'
    1140       new = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     1135      new = QueryConfigKey( KeyPath)
    11411136   else
    11421137      new = arg(1)
    … …  
    12141209; Any following specifications, separated by a period are ignored.
    12151210defc SetTextFont
    1216    universal nepmd_hini
    12171211   universal lastfont
    12181212   arg1 = upcase(arg(1))
    … …  
    12231217      --endif
    12241218      KeyPath = '\NEPMD\User\Fonts\Text'
    1225       new = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     1219      new = QueryConfigKey( KeyPath)
    12261220   else
    12271221      new = arg(1)
    … …  
    12561250   --universal appname
    12571251   --universal app_hini
    1258    universal nepmd_hini
    12591252   arg1 = upcase(arg(1))
    12601253   if arg1 = '' | arg1 = 'DEFAULT' then
    … …  
    12661259      --endif
    12671260      KeyPath = '\NEPMD\User\Colors\Text'
    1268       new = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     1261      new = QueryConfigKey( KeyPath)
    12691262   else
    12701263      new = ConvertColor( arg(1))
    … …  
    12851278   --universal appname
    12861279   --universal app_hini
    1287    universal nepmd_hini
    12881280   arg1 = upcase(arg(1))
    12891281   if arg1 = '' | arg1 = 'DEFAULT' then
    … …  
    12951287      --endif
    12961288      KeyPath = '\NEPMD\User\Colors\Mark'
    1297       new = NepmdQueryConfigValue( nepmd_hini, KeyPath)
     1289      new = QueryConfigKey( KeyPath)
    12981290   else
    12991291      new = ConvertColor(arg(1))
Note: See TracChangeset for help on using the changeset viewer.