|
263 | 263 |
|
264 | 264 | Процедура УдалитьСкриптыЗапуска(Знач МетаданныеПакета, Знач ИмяПакета, Знач РежимУстановки) |
265 | 265 |
|
266 | | - СИ = Новый СистемнаяИнформация(); |
267 | | - ЭтоWindows = Найти(НРег(СИ.ВерсияОС), "windows") > 0; |
268 | | - |
269 | 266 | ИсполняемыеФайлы = МетаданныеПакета.ИсполняемыеФайлы(); |
270 | 267 | Если ИсполняемыеФайлы.Количество() = 0 Тогда |
271 | 268 | Возврат; |
|
274 | 271 | Если РежимУстановки = РежимУстановкиПакетов.Локально Тогда |
275 | 272 | КаталогСкриптов = ОбъединитьПути(КонстантыOpm.ЛокальныйКаталогУстановкиПакетов, "bin"); |
276 | 273 | Иначе |
277 | | - КаталогСкриптов = ?(ЭтоWindows, КаталогПрограммы(), ПолучитьКаталогСкриптовLinux()); |
| 274 | + КаталогСкриптов = КаталогПрограммы(); |
278 | 275 | Если НЕ ПустаяСтрока(ПолучитьПеременнуюСреды("OSCRIPTBIN")) Тогда |
279 | 276 | КаталогСкриптов = ПолучитьПеременнуюСреды("OSCRIPTBIN"); |
280 | 277 | КонецЕсли; |
|
284 | 281 |
|
285 | 282 | ИмяСкриптаЗапуска = ?(ПустаяСтрока(ФайлПриложения.ИмяПриложения), ИмяПакета, ФайлПриложения.ИмяПриложения); |
286 | 283 |
|
287 | | - Если ЭтоWindows Тогда |
288 | | - ПутьКСкрипту = ОбъединитьПути(КаталогСкриптов, ИмяСкриптаЗапуска + ".bat"); |
289 | | - Если ФС.ФайлСуществует(ПутьКСкрипту) Тогда |
290 | | - Лог.Отладка("Удаляю скрипт запуска: %1", ПутьКСкрипту); |
291 | | - УдалитьФайлы(ПутьКСкрипту); |
292 | | - КонецЕсли; |
| 284 | + ПутьКСкрипту = ОбъединитьПути(КаталогСкриптов, ИмяСкриптаЗапуска + ".bat"); |
| 285 | + Если ФС.ФайлСуществует(ПутьКСкрипту) Тогда |
| 286 | + Лог.Отладка("Удаляю скрипт запуска: %1", ПутьКСкрипту); |
| 287 | + УдалитьФайлы(ПутьКСкрипту); |
293 | 288 | КонецЕсли; |
294 | 289 |
|
295 | 290 | ПутьКСкрипту = ОбъединитьПути(КаталогСкриптов, ИмяСкриптаЗапуска); |
|
302 | 297 |
|
303 | 298 | КонецПроцедуры |
304 | 299 |
|
305 | | -Функция ПолучитьКаталогСкриптовLinux() |
306 | | - |
307 | | - ТекстовыйДокумент = Новый ТекстовыйДокумент(); |
308 | | - Попытка |
309 | | - ТекстовыйДокумент.Записать("/usr/bin/opm-check-temp.txt"); |
310 | | - УдалитьФайлы("/usr/bin/opm-check-temp.txt"); |
311 | | - Возврат "/usr/bin"; |
312 | | - Исключение |
313 | | - Возврат "/usr/local/bin"; |
314 | | - КонецПопытки; |
315 | | - |
316 | | -КонецФункции |
317 | | - |
318 | 300 | Функция ПолучитьКаталогСистемныхБиблиотек() |
319 | 301 |
|
320 | 302 | СистемныеБиблиотеки = ОбъединитьПути(КаталогПрограммы(), ПолучитьЗначениеСистемнойНастройки("lib.system")); |
|
0 commit comments