tmp

Author: zonuexe

markdown-preview-eww.el

@@ -111,18 +111,32 @@ File.write(\"%s\", markdown.render(doc))
 
 (defun markdown-preview-eww--make-converter ()
   "Return closure for convert markdown and open eww buffer."
-  (let ((doc-buffer (current-buffer))
+  (let ((preview-buffer nil)
+        (last-line (line-number-at-pos (point)))
+        (doc-buffer (current-buffer))
         (output-buffer (concat "*markdown-preview-eww " (buffer-name) "*"))
         (preview-temp-file (markdown-preview--tmp-file (buffer-name))))
     (cl-multiple-value-bind (command args)
         (markdown-preview-eww-convert-command preview-temp-file)
       (lambda ()
         (when (eq doc-buffer (current-buffer))
           (apply 'call-process-region (point-max) (point-min) command nil output-buffer nil args)
-          (if (not (file-readable-p preview-temp-file))
-              (error "File not exists")
-            (eww-open-file preview-temp-file)
-            (switch-to-buffer doc-buffer)))))))
+          (unless (file-readable-p preview-temp-file)
+            (display-buffer output-buffer)
+            (error "File not exists"))
+          (eww-open-file preview-temp-file)
+          (setq preview-buffer (get-buffer "*eww*"))
+          (display-buffer-use-some-window preview-buffer '((inhibit-same-window . t)))
+          (pop-to-buffer preview-buffer)
+          (with-current-buffer preview-buffer
+            (goto-char (point-min))
+            (forward-line last-line)
+            (message (concat (buffer-name) ":" (number-to-string (line-number-at-pos (point)))))
+            (setq last-line (1- (line-number-at-pos (point))))
+            (recenter)
+            (message (number-to-string last-line)))
+          (display-buffer doc-buffer)))
+      )))
 
 (defun markdown-preview-eww-disable ()
   "Disable realtime preview for current buffer."