From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/67429 Path: news.gmane.org!not-for-mail From: Reiner Steib Newsgroups: gmane.emacs.devel,gmane.emacs.gnus.general Subject: informat.el: `Info-split' split size (was: registry doc patch) Date: Wed, 24 Sep 2008 18:44:12 +0200 Message-ID: <87r679qysj.fsf_-_@marauder.physik.uni-ulm.de> References: <87abfkmuko.fsf@jondo.cante.net> <86bpzlt5cq.fsf@lifelogs.com> <87prnut63f.fsf@catnip.gol.com> <86vdxlfdtn.fsf@lifelogs.com> <87zlmwoyvs.fsf@marauder.physik.uni-ulm.de> <86zlmvkg8p.fsf_-_@lifelogs.com> <86vdwxnmzf.fsf_-_@lifelogs.com> <8763ow9ssf.fsf@freemail.hu> <86iqswnr9w.fsf@lifelogs.com> <86bpykjefp.fsf@lifelogs.com> <87d4iuu0vc.fsf@marauder.physik.uni-ulm.de> Reply-To: Reiner Steib NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1222274683 8716 80.91.229.12 (24 Sep 2008 16:44:43 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 24 Sep 2008 16:44:43 +0000 (UTC) Cc: ding@gnus.org To: emacs-devel@gnu.org, Katsumi Yamaoka Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Sep 24 18:45:40 2008 connect(): Connection refused Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1KiXUg-0000iC-2Y for ged-emacs-devel@m.gmane.org; Wed, 24 Sep 2008 18:45:38 +0200 Original-Received: from localhost ([127.0.0.1]:36942 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KiXTe-0004jc-0G for ged-emacs-devel@m.gmane.org; Wed, 24 Sep 2008 12:44:34 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1KiXTT-0004cc-Uj for emacs-devel@gnu.org; Wed, 24 Sep 2008 12:44:24 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1KiXTR-0004Yf-Fo for emacs-devel@gnu.org; Wed, 24 Sep 2008 12:44:22 -0400 Original-Received: from [199.232.76.173] (port=39334 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KiXTP-0004Y8-Qj for emacs-devel@gnu.org; Wed, 24 Sep 2008 12:44:19 -0400 Original-Received: from mail.uni-ulm.de ([134.60.1.11]:44291) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1KiXTP-0002uk-CS for emacs-devel@gnu.org; Wed, 24 Sep 2008 12:44:19 -0400 Original-Received: from bridgekeeper.physik.uni-ulm.de (bridgekeeper.physik.uni-ulm.de [134.60.41.37]) by mail.uni-ulm.de (8.14.2/8.14.2) with ESMTP id m8OGiFIZ014879; Wed, 24 Sep 2008 18:44:16 +0200 (MEST) Original-Received: from localhost (localhost [127.0.0.1]) by bridgekeeper.physik.uni-ulm.de (Postfix) with ESMTP id BE0EB13325; Wed, 24 Sep 2008 18:44:15 +0200 (CEST) X-Face: 3Phac&+dw=IZHjhua]bp}LH<*p{qzj8u+ List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:104112 gmane.emacs.gnus.general:67429 Archived-At: On Wed, Sep 24 2008, Katsumi Yamaoka wrote: > BTW, with MAKEINFO=no the Gnus Info files are divided into 24 > files (gnus, gnus-1, ..., gnus-23). Those are too small, aren't > they? The threshold is hard-coded in `Info-split' (informat.el). ,----[ f Info-split RET ] | Info-split is an interactive autoloaded Lisp function in `informat'. | (Info-split) | | Split an info file into an indirect file plus bounded-size subfiles. | Each subfile will be up to 50,000 characters plus one node. [...] `---- I think the threshold should not be hard-coded and it's default should be like makeinfo's so that we don't need such workarounds: > A workaround I added to the Japanese edition of the Gnus Info is: > > ;; Reduce the number of split Info files. > (if (featurep 'xemacs) > (if (load "informat.el" t t) > (let* ((fn (symbol-function 'Info-split)) > (fns (prin1-to-string fn))) > (load "informat.elc" t t) > (when (and (string-match "\\([\t\n ]+\\)50000\\([\t\n )]+\\)" fns) > (condition-case nil > (setq fn (byte-compile > (read (replace-match "\\1200000\\2" nil nil > fns)))) > (error nil)) > (fset 'Info-split fn))))) > (require 'informat) > (let* ((fn (symbol-function 'Info-split)) > (fns (prin1-to-string fn))) > (when (string-match "\\([\t\n ]+\\)50000\\([\t\n ]+\\)" fns) > (condition-case nil > (fset 'Info-split (read (replace-match "\\1200000\\2" nil nil fns))) > (error > (fset 'Info-split fn)))))) Bye, Reiner. -- ,,, (o o) ---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/