[fringe] / cruft.el

;; scheme indentation
(mapc (lambda (item) (put (car item) 'scheme-indent-function (cdr item)))
      '((with-values . 2) (when . 1) (unless . 1)
	(condition-case . 1)))
Commit	Line	Data
667134e3 MW	1	;; scheme indentation
	2	(mapc (lambda (item) (put (car item) 'scheme-indent-function (cdr item)))
	3	'((with-values . 2) (when . 1) (unless . 1)
	4	(condition-case . 1)))