Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » FAR Manager (часть 6)

Модерирует : gyra, Maz

Maz (26-09-2022 12:52): FAR Manager (часть 7)  Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

   

Alexyz21



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Код:
local GitPath="C:\\far-scripts"
local F=far.Flags
local K=far.Colors
local elem=K.COL_COMMANDLINEPREFIX
local tFarColor=far.AdvControl(F.ACTL_GETCOLOR,elem)
local FC_bkp=tFarColor.ForegroundColor
 
Event
{
  group="FolderChanged";
  description="FolderChanged";
  action=function(Event,Data)
    local PanelDir=panel.GetPanelDirectory(handle,1)
    local GitBranch=""
    if PanelDir.Name:sub(1,-1)==GitPath then
      GitBranch='$S$C'..io.popen('git branch -a'):read("*all"):match("%* (%C+)")..'$F'
      tFarColor.ForegroundColor=14
    else tFarColor.ForegroundColor=FC_bkp
    end
    far.AdvControl(F.ACTL_SETARRAYCOLOR,nil,{StartIndex=elem,--[[Flags="FSETCLR_REDRAW",]]tFarColor})
    win.SetEnv("GITBRANCH",GitBranch)  
  end
}

Всего записей: 3471 | Зарегистр. 16-06-2007 | Отправлено: 13:19 19-05-2020 | Исправлено: Alexyz21, 13:39 19-05-2020
   

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Программы » FAR Manager (часть 6)
Maz (26-09-2022 12:52): FAR Manager (часть 7)


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru