(let ((fill-column width))
(insert str)
(fill-region (point-min) (point-max))
- (mapcar '(lambda (s) (fuel-table--pad-str s width))
+ (mapcar #'(lambda (s) (fuel-table--pad-str s width))
(split-string (buffer-string) "\n"))))))
(defun fuel-table--pad-row (row)
\f
(provide 'fuel-table)
+
;;; fuel-table.el ends here