Elisp: Несколько выражений в теле IF

Формулировка задачи:

Требуется выполнить несколько выражений в if-else, псевдо-код:

(if условие 
     (действие-then) 
     (действие1-else)  (действие2-else))

Сделал так:

(if условие 
     (действие-then) 
     (eq (действие1-else)  (действие2-else)))

Некрасиво получается. Есть ли правилный способ?

Решение задачи: «Elisp: Несколько выражений в теле IF»

textual
                            Листинг программы 
                        

                            (if условие 
     (действие-then) 
     (prog1 (действие1-else)  (действие2-else)))
                        