1
0
mirror of https://github.com/1C-Company/GitConverter.git synced 2025-02-05 13:05:20 +02:00

Опциональное удаление настроек сервера перед добавлением новых

This commit is contained in:
Dmitriy Marmyshev 2019-02-04 11:28:57 +03:00
parent c02892479e
commit da155155ee

View File

@ -2133,6 +2133,12 @@
ПозицияРазделителя = СтрНайти(АдресРепозиторияGit, "://");
Если ПозицияРазделителя > 0 Тогда
Если ЭтоWindowsСервер Тогда
ТекстКоманды = "git remote remove origin" + ВыводЛога + " || set ERRORLEVEL=0";
Иначе
ТекстКоманды = "git remote remove origin" + ВыводЛога + " || true";
КонецЕсли;
ФайлКоманды.ДобавитьСтроку(ТекстКоманды);
ТекстКоманды = "git remote add origin %АдресРепозиторияGit%" + ВыводЛога;
АдресРепозиторияGit = Лев(АдресРепозиторияGit, ПозицияРазделителя + 2)
+ РеквизитыХранилища.ПользовательСервераGit + ":"
@ -2150,8 +2156,15 @@
ФайлКоманды.Записать(ФайлКомандыGit, КодировкаТекста.Системная, Символы.ПС);
КонецЕсли;
КодВозврата = Неопределено;
ЗапуститьПриложение(?(ЭтоWindowsСервер, "", "bash ")
+ ФайлКомандыGit, РеквизитыХранилища.ЛокальныйКаталогGit, Истина);
+ ФайлКомандыGit, РеквизитыХранилища.ЛокальныйКаталогGit, Истина, КодВозврата);
Если КодВозврата <> Неопределено И КодВозврата <> 0 Тогда
ТекстШаблона = НСтр("ru = 'Установка адреса Git-серсвера выполнена с ошибкой.
|Файл лога: %ФайлЛога%'");
ВызватьИсключение СтрЗаменить(ТекстШаблона, "%ФайлЛога%", ФайлЛога);
КонецЕсли;
КонецПроцедуры