hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

obsoleting a function.

Browse Source
This commit is contained in:
Kazu Yamamoto 2014-04-21 17:37:41 +09:00
parent 36e32ab1b2
commit 067d3b7535
1 changed files with 0 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
elisp/ghc-func.el
View File

@ -73,17 +73,6 @@
(read (current-buffer)) (read (current-buffer))
(error ())))) (error ()))))
(defun ghc-read-lisp-list (func n)
(with-temp-buffer
(funcall func)
(goto-char (point-min))
(condition-case nil
(let ((m (set-marker (make-marker) 1 (current-buffer)))
ret)
(dotimes (i n (nreverse ret))
(ghc-add ret (read m))))
(error ()))))
(defun ghc-read-lisp-list-this-buffer (n) (defun ghc-read-lisp-list-this-buffer (n)
(save-excursion (save-excursion
(goto-char (point-min)) (goto-char (point-min))