+ ;; No space is needed before or after a breakable character or
+ ;; at the beginning of a line.
+ (when (and (eq (preceding-char) ? )
+ (or (= (line-beginning-position) (1- (point)))
+ (aref fill-find-break-point-function-table
+ (char-after (- (point) 2)))
+ (aref fill-find-break-point-function-table
+ (aref elem 0))))
+ (delete-char -1))