[olga87]

Здравствуйте Уважаемые программисты!

Есть фрагмент кода (из txt чтение списка и далее преобразование списка в строку, строка передается в "data"):

Код:

[Выделить все]

(setq fp (open "C:\\test\\Paths.txt" "r") lst '())
  (while (setq l (read-line fp))
    (setq lst (cons l lst))
  )
  (close fp)
  (setq lst (reverse lst))
  (setq data (LM:lst->str lst ";"))

Подскажите пожалуйста, если "data" в итоге "пустая", например, файл txt был пуст, то как отследить это, т.е. как написать условие, что если "data" пусто, то делай одно, иначе другое?

Заранее спасибо!

[Кулик Алексей aka kpblc]

Перед вызовом фунции Ли Мака проверяй что lst не nil:
(if lst
(progn
(setq lst (reverse lst))
...

[olga87]

Спасибо получилось!