unofficial mirror of help-gnu-emacs@gnu.org
 help / color / mirror / Atom feed
* Can we add a function which is used to returned immediately within an source file for lib?
@ 2008-09-10  9:31 Yiyi Hu
  2008-09-11  5:04 ` Kevin Rodgers
  2008-09-12  1:27 ` Thien-Thi Nguyen
  0 siblings, 2 replies; 5+ messages in thread
From: Yiyi Hu @ 2008-09-10  9:31 UTC (permalink / raw)
  To: help-gnu-emacs

Can we add a function or extend (return t) to skip loading the rest of
source please?

Eg, my ~/.emacs

(defun byte-compile-file-if-newer (src)
 (let ((result (concat src ".elc")))
   (when (file-newer-than-file-p src result)
     (byte-compile-file src)
     (load-file result))))

(byte-compile-file-if-newer "~/.emacs")

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(auto-compression-mode t)
 '(column-number-mode t)
 '(cperl-indent-level 4)
 '(delete-selection-mode t)
 '(display-battery-mode t)
 '(display-time-24hr-format t)
 '(display-time-day-and-date t)
 '(display-time-mode t)
 '(encoded-kbd-mode t)
 '(gnus-nntp-server "news.readfreenews.net")
 '(indent-tabs-mode nil)
 '(inferior-lisp-program "sbcl")
 '(inhibit-eol-conversion t)
 '(inhibit-startup-screen t)
 '(initial-scratch-message nil)
 '(menu-bar-mode nil)
 '(mouse-avoidance-mode (quote exile) nil (avoid)))

For now, there is now way to support skip the rest of ~/.emacs after
(byte-compile-file-if-newer "~/.emacs").




^ permalink raw reply	[flat|nested] 5+ messages in thread

* Re: Can we add a function which is used to returned immediately within an source file for lib?
  2008-09-10  9:31 Can we add a function which is used to returned immediately within an source file for lib? Yiyi Hu
@ 2008-09-11  5:04 ` Kevin Rodgers
  2008-09-12  2:24   ` Yiyi Hu
  2008-09-12  1:27 ` Thien-Thi Nguyen
  1 sibling, 1 reply; 5+ messages in thread
From: Kevin Rodgers @ 2008-09-11  5:04 UTC (permalink / raw)
  To: help-gnu-emacs

Yiyi Hu wrote:
> Can we add a function or extend (return t) to skip loading the rest of
> source please?
> 
> Eg, my ~/.emacs
> 
> (defun byte-compile-file-if-newer (src)
>  (let ((result (concat src ".elc")))
>    (when (file-newer-than-file-p src result)
>      (byte-compile-file src)
>      (load-file result))))
> 
> (byte-compile-file-if-newer "~/.emacs")
> 
> (custom-set-variables
>  ;; custom-set-variables was added by Custom.
>  ;; If you edit it by hand, you could mess it up, so be careful.
>  ;; Your init file should contain only one such instance.
>  ;; If there is more than one, they won't work right.
>  '(auto-compression-mode t)
>  '(column-number-mode t)
>  '(cperl-indent-level 4)
>  '(delete-selection-mode t)
>  '(display-battery-mode t)
>  '(display-time-24hr-format t)
>  '(display-time-day-and-date t)
>  '(display-time-mode t)
>  '(encoded-kbd-mode t)
>  '(gnus-nntp-server "news.readfreenews.net")
>  '(indent-tabs-mode nil)
>  '(inferior-lisp-program "sbcl")
>  '(inhibit-eol-conversion t)
>  '(inhibit-startup-screen t)
>  '(initial-scratch-message nil)
>  '(menu-bar-mode nil)
>  '(mouse-avoidance-mode (quote exile) nil (avoid)))
> 
> For now, there is now way to support skip the rest of ~/.emacs after
> (byte-compile-file-if-newer "~/.emacs").

Yes, it might be convenient if the load function established a tag that
you could throw to, or if some higher level interface to load did so
e.g. the inner lambda form in command-line (startup.el).

-- 
Kevin Rodgers
Denver, Colorado, USA





^ permalink raw reply	[flat|nested] 5+ messages in thread

* Re: Can we add a function which is used to returned immediately within an source file for lib?
  2008-09-10  9:31 Can we add a function which is used to returned immediately within an source file for lib? Yiyi Hu
  2008-09-11  5:04 ` Kevin Rodgers
@ 2008-09-12  1:27 ` Thien-Thi Nguyen
  2008-09-12  2:23   ` Yiyi Hu
  1 sibling, 1 reply; 5+ messages in thread
From: Thien-Thi Nguyen @ 2008-09-12  1:27 UTC (permalink / raw)
  To: Yiyi Hu; +Cc: help-gnu-emacs

() "Yiyi Hu" <yiyihu@gmail.com>
() Wed, 10 Sep 2008 17:31:07 +0800

   to skip loading the rest of source

You can try:

(defun skip-loading ()
  (with-current-buffer " *load*"
    (goto-char (point-max))))

thi




^ permalink raw reply	[flat|nested] 5+ messages in thread

* Re: Can we add a function which is used to returned immediately within an source file for lib?
  2008-09-12  1:27 ` Thien-Thi Nguyen
@ 2008-09-12  2:23   ` Yiyi Hu
  0 siblings, 0 replies; 5+ messages in thread
From: Yiyi Hu @ 2008-09-12  2:23 UTC (permalink / raw)
  To: Thien-Thi Nguyen; +Cc: help-gnu-emacs

It doesn't work when ~/.emacs.elc and ~/.emacs exists, And ~/.emacs is
newer than ~/.emacs.elc,
I'll got error which is a bit like.

An error has occurred while loading `/home/hyy/.emacs.elc':
error: No buffer named  *load*

On Fri, Sep 12, 2008 at 1:27 AM, Thien-Thi Nguyen <ttn@gnuvola.org> wrote:
> () "Yiyi Hu" <yiyihu@gmail.com>
> () Wed, 10 Sep 2008 17:31:07 +0800
>
>   to skip loading the rest of source
>
> You can try:
>
> (defun skip-loading ()
>  (with-current-buffer " *load*"
>    (goto-char (point-max))))
>
> thi
>




^ permalink raw reply	[flat|nested] 5+ messages in thread

* Re: Can we add a function which is used to returned immediately within an source file for lib?
  2008-09-11  5:04 ` Kevin Rodgers
@ 2008-09-12  2:24   ` Yiyi Hu
  0 siblings, 0 replies; 5+ messages in thread
From: Yiyi Hu @ 2008-09-12  2:24 UTC (permalink / raw)
  To: Kevin Rodgers; +Cc: help-gnu-emacs

IMHO,
It won't be easily done without touching the c source for the load
function to quit directly.

On Thu, Sep 11, 2008 at 5:04 AM, Kevin Rodgers
<kevin.d.rodgers@gmail.com> wrote:
> Yiyi Hu wrote:
>>
>> Can we add a function or extend (return t) to skip loading the rest of
>> source please?
>>
>> Eg, my ~/.emacs
>>
>> (defun byte-compile-file-if-newer (src)
>>  (let ((result (concat src ".elc")))
>>   (when (file-newer-than-file-p src result)
>>     (byte-compile-file src)
>>     (load-file result))))
>>
>> (byte-compile-file-if-newer "~/.emacs")
>>
>> (custom-set-variables
>>  ;; custom-set-variables was added by Custom.
>>  ;; If you edit it by hand, you could mess it up, so be careful.
>>  ;; Your init file should contain only one such instance.
>>  ;; If there is more than one, they won't work right.
>>  '(auto-compression-mode t)
>>  '(column-number-mode t)
>>  '(cperl-indent-level 4)
>>  '(delete-selection-mode t)
>>  '(display-battery-mode t)
>>  '(display-time-24hr-format t)
>>  '(display-time-day-and-date t)
>>  '(display-time-mode t)
>>  '(encoded-kbd-mode t)
>>  '(gnus-nntp-server "news.readfreenews.net")
>>  '(indent-tabs-mode nil)
>>  '(inferior-lisp-program "sbcl")
>>  '(inhibit-eol-conversion t)
>>  '(inhibit-startup-screen t)
>>  '(initial-scratch-message nil)
>>  '(menu-bar-mode nil)
>>  '(mouse-avoidance-mode (quote exile) nil (avoid)))
>>
>> For now, there is now way to support skip the rest of ~/.emacs after
>> (byte-compile-file-if-newer "~/.emacs").
>
> Yes, it might be convenient if the load function established a tag that
> you could throw to, or if some higher level interface to load did so
> e.g. the inner lambda form in command-line (startup.el).
>
> --
> Kevin Rodgers
> Denver, Colorado, USA
>
>
>
>




^ permalink raw reply	[flat|nested] 5+ messages in thread

end of thread, other threads:[~2008-09-12  2:24 UTC | newest]

Thread overview: 5+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2008-09-10  9:31 Can we add a function which is used to returned immediately within an source file for lib? Yiyi Hu
2008-09-11  5:04 ` Kevin Rodgers
2008-09-12  2:24   ` Yiyi Hu
2008-09-12  1:27 ` Thien-Thi Nguyen
2008-09-12  2:23   ` Yiyi Hu

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).