From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Kevin Rodgers Newsgroups: gmane.emacs.help Subject: Re: Can we add a function which is used to returned immediately within an source file for lib? Date: Wed, 10 Sep 2008 23:04:37 -0600 Message-ID: References: NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: 7bit X-Trace: ger.gmane.org 1221109634 19275 80.91.229.12 (11 Sep 2008 05:07:14 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Thu, 11 Sep 2008 05:07:14 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Thu Sep 11 07:07:48 2008 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1KdeNs-0007oX-MR for geh-help-gnu-emacs@m.gmane.org; Thu, 11 Sep 2008 07:06:24 +0200 Original-Received: from localhost ([127.0.0.1]:52756 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KdeMs-0002Gf-L3 for geh-help-gnu-emacs@m.gmane.org; Thu, 11 Sep 2008 01:05:22 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1KdeMO-0002G7-5G for help-gnu-emacs@gnu.org; Thu, 11 Sep 2008 01:04:52 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1KdeMN-0002Fo-2b for help-gnu-emacs@gnu.org; Thu, 11 Sep 2008 01:04:51 -0400 Original-Received: from [199.232.76.173] (port=58033 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KdeMM-0002Fk-TT for help-gnu-emacs@gnu.org; Thu, 11 Sep 2008 01:04:50 -0400 Original-Received: from main.gmane.org ([80.91.229.2]:47919 helo=ciao.gmane.org) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1KdeMM-0000oS-9V for help-gnu-emacs@gnu.org; Thu, 11 Sep 2008 01:04:50 -0400 Original-Received: from list by ciao.gmane.org with local (Exim 4.43) id 1KdeMJ-0008SQ-IM for help-gnu-emacs@gnu.org; Thu, 11 Sep 2008 05:04:47 +0000 Original-Received: from c-67-161-145-183.hsd1.co.comcast.net ([67.161.145.183]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 11 Sep 2008 05:04:47 +0000 Original-Received: from kevin.d.rodgers by c-67-161-145-183.hsd1.co.comcast.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 11 Sep 2008 05:04:47 +0000 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 47 Original-X-Complaints-To: usenet@ger.gmane.org X-Gmane-NNTP-Posting-Host: c-67-161-145-183.hsd1.co.comcast.net User-Agent: Thunderbird 2.0.0.16 (Macintosh/20080707) In-Reply-To: X-detected-kernel: by monty-python.gnu.org: Linux 2.6, seldom 2.4 (older, 4) X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:57411 Archived-At: 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