Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

assume default utf-8 encoding

  • Loading branch information...
commit 02e9690fd0c83ae2b2c9c0489be1c75d447412d7 1 parent 7c3d8c0
@juergenhoetzel authored
Showing with 3 additions and 1 deletion.
  1. +3 −1 babel.el
View
4 babel.el
@@ -131,6 +131,7 @@
;;; History
;; 1.2 * Added FOSS MT platform Apertium
;; (by Kevin Brubeck Unhammer)
+;; * Assume UTF-8, if HTTP header missing
;; 1.1 * Fixed invalid language code mapping for serveral
;; languages
@@ -365,7 +366,8 @@ function, not available on other emacsen"
(require 'url-handlers)
(defun babel-url-retrieve (url)
(let ((tmp (url-retrieve-synchronously url)))
- (url-insert tmp)))))
+ (unless (cadr (url-insert tmp))
+ (mm-decode-coding-region (point-min) (point-max) 'utf-8))))))
(defun babel-wash-regex (regex)
"Extract the useful information from the HTML returned by fetch function
Please sign in to comment.
Something went wrong with that request. Please try again.