comment.
This commit is contained in:
parent
47f95149e3
commit
f9a8361bca
@ -65,6 +65,7 @@
|
||||
(funcall func)
|
||||
(ghc-read-lisp-this-buffer)))
|
||||
|
||||
;; OK/NG are ignored.
|
||||
(defun ghc-read-lisp-this-buffer ()
|
||||
(save-excursion
|
||||
(goto-char (point-min))
|
||||
|
@ -91,6 +91,6 @@
|
||||
(defun ghc-ins-mod-callback ()
|
||||
(let ((mods (ghc-read-lisp-this-buffer)))
|
||||
(setq ghc-ins-mod-rendezvous t)
|
||||
(setq ghc-ins-mod-results mods))) ;; fixme -- OK
|
||||
(setq ghc-ins-mod-results mods)))
|
||||
|
||||
(provide 'ghc-ins-mod)
|
||||
|
Loading…
Reference in New Issue
Block a user