Syntax for setenv function ?

[email protected] writes:
> Hello,
> 
> Today I tried to make my life a little easier with the following function:
> 
> (require 'env)
> 
> (defun set-arm-environment()
>   "Set environment variables so that compilation for arm is possible"
>   (interactive)
>   (progn ( ( setenv "QTDIR" "/opt/qt/arm/qt3" )
>            ( setenv "LD_LIBRARY_PATH" "/opt/qt/arm/qt3/lib" )
>            ( setenv "QMAKESPEC" "qws/linux-arm-g++" )
>            )
>          )
>   )
> 

The problem is caused by the wrong syntax for progn.  There are too
much parentheses.  Below is the corrected version.

 (defun set-arm-environment()
   "Set environment variables so that compilation for arm is possible"
   (interactive)
   (progn 
       ( setenv "QTDIR" "/opt/qt/arm/qt3" )
       ( setenv "LD_LIBRARY_PATH" "/opt/qt/arm/qt3/lib" )
       ( setenv "QMAKESPEC" "qws/linux-arm-g++" )
   )
)

Regards,
Karl Stroetmann


-- 
Prof. Dr. Karl Stroetmann       http://www.ba-stuttgart.de/stroetmann
Berufsakademie Stuttgart
Tel.:                           0711/6673 4504
Mobile:                         0179/53 23 381