Differences From
Artifact [17e6e6e90b]:
224 224 Load results into buffer BUF. STATUS is used to check for
225 225 errors."
226 226 (when (buffer-live-p buf)
227 227 (when (plist-get status :error)
228 228 (error "Error while loading: %s"
229 229 (cdr (plist-get status :error))))
230 230 (forward-paragraph)
231 + (decode-coding-region (point-min) (point-max) 'utf-8)
231 232 (let ((list (read (current-buffer))))
232 233 (kill-buffer)
233 234 (with-current-buffer buf
234 235 (let (ent)
235 236 (dolist (thread list)
236 237 (push (list (car thread)
237 238 (vector (substring (cdr (assq 'date (cdr thread)))
................................................................................
253 254 load. STATUS is used to check for errors."
254 255 (when (buffer-live-p buf)
255 256 (when (plist-get status :error)
256 257 (error "Error while loading: %s"
257 258 (cdr (plist-get status :error))))
258 259 (prog-mode)
259 260 (forward-paragraph)
261 + (decode-coding-region (point) (point-max) 'utf-8)
260 262 (save-excursion
261 263 (save-match-data
262 264 (while (search-forward "#f" nil t)
263 265 (unless (cadddr (syntax-ppss))
264 266 (replace-match "nil")))))
265 267 (save-excursion
266 268 (save-match-data