(lambda (port) (display "Loading Edwin" port))
(lambda ()
(parameterize ((param:suppress-loading-message? #t))
- (load-option 'edwin)
- (if (let ((display (get-environment-variable "DISPLAY")))
- (and (string? display)
- (not (string-null? display))))
- (ignore-errors (lambda () (load-option 'x11-screen))))))))
+ (load-option 'edwin)
+ (if (let ((display (get-environment-variable "DISPLAY")))
+ (and (string? display)
+ (not (string-null? display))))
+ (ignore-errors (lambda () (load-option 'x11-screen)))))))
(apply (environment-lookup (->environment '(edwin)) 'edit) args)))))
(define edwin edit)