- (append
- (list
- (append
- '(:random)
- ;; Directory monitor and file monitor.
- (make-list (/ n 2) 'changed)
- (make-list (/ n 2) 'changed)
- ;; Just the directory monitor.
- (make-list (/ n 2) 'created)
- (make-list (/ n 2) 'changed))
- (append
- '(:random)
- ;; Directory monitor and file monitor.
- (make-list (/ n 2) 'changed)
- (make-list (/ n 2) 'changed)
- (make-list (/ n 2) 'changed)
- (make-list (/ n 2) 'changed)
- ;; Just the directory monitor.
- (make-list (/ n 2) 'created)
- (make-list (/ n 2) 'changed))))
+ (list
+ (append
+ '(:random)
+ ;; Directory monitor and file monitor.
+ (make-list (/ n 2) 'changed)
+ (make-list (/ n 2) 'changed)
+ ;; Just the directory monitor.
+ (make-list (/ n 2) 'created)
+ (make-list (/ n 2) 'changed))
+ (append
+ '(:random)
+ ;; Directory monitor and file monitor.
+ (make-list (/ n 2) 'changed)
+ (make-list (/ n 2) 'changed)
+ (make-list (/ n 2) 'changed)
+ (make-list (/ n 2) 'changed)
+ ;; Just the directory monitor.
+ (make-list (/ n 2) 'created)
+ (make-list (/ n 2) 'changed)))