Привет, Sergey!
On Tue, 29 Apr 2003 15:42:10 +0400 Sergey Vlasov wrote:
>  Есть такая конструкция в gnus:
> 
> ===.gnus.el===
> (fido-adr  (concat      "From: "        from
> (substring (car fido-adr-list) 1) ":"
> (substring (cadr fido-adr-list) 1) "/"
> (substring (caddr fido-adr-list) 1)
> (if (cadddr fido-adr-list)
> (concat "." (substring (cadddr fido-adr-list) 1))))))
> ===
> 
>  Она работает только при наличии mule-ucs, а хотелось бы от этого
> избавиться. Без mule-ucs работают только car и cadr. Может можно
> чем-то заменить эту конструкцию? 
 SV> Либо добавить (require 'cl), либо (car (cdr (cdr ....)))
  Спасибо помогло 1-е, а 2-й метод как-нибудб на досуге
 разберу. Просто пытаюсь скорость работы оптимизировать.
-- 
 Don't worry.			ICQ #149041245
   Andrey Slusar.