Re: Iterate many tables

[Johan Ekh <ekh.johan@gmail.com>]

[-- Attachment #1.1: Type: text/plain, Size: 5535 bytes --]

Hi,
You're right, I'm actually not using the latest version. It fails to
install. I use the version "6.33trans".
When I try to upgrade with Git I get the compilation error:


In org-publish-get-base-files-1:
org-publish.el:407:13:Warning: reference to free variable
`sitemap-requested'
org-publish.el:915:1:Error: Invalid read syntax: "#"
make: *** [lisp/org-publish.elc] Error 1


Do you know what is wrong? I checked line 915 in "org-publish.el" but there
is
no "#" in that line.

Do you know what is wrong?

Best regards,
Johan

On Fri, May 14, 2010 at 2:32 PM, Carsten Dominik
<carsten.dominik@gmail.com>wrote:

> Hi Johan,
>
> I think you are not using the latest version of Org?  Please upgrade.
>
> - Carsten
>
>
> On May 14, 2010, at 12:07 PM, Johan Ekh wrote:
>
>  Hi,
>> I've tried the functions but I get the error described above.
>> I've put the functions in my .emacs exactly as written in the mail.
>> I use the latest org-mode (using Git) and I use emacs 23.1.1 on
>> a 64-bit openSuse 11.1 linux laptop.
>>
>> Do the cursor need to be located anywhere specific when executing
>> the functions? I've tried to execute the functions while having all tables
>> expanded and the cursor somewhere in the last table.
>>
>> Best regards,
>> Johan
>>
>> On Fri, May 7, 2010 at 9:36 AM, Carsten Dominik <
>> carsten.dominik@gmail.com> wrote:
>> Hi,
>>
>> both functions work without any problem for me, so I do not know what you
>> are doing differently.  maybe you ned to describe exactly how you are
>> calling the functions.
>>
>> - Carsten
>>
>>
>> On May 6, 2010, at 1:34 PM, T Helms wrote:
>>
>> Thanks for bringing this up, it would be a useful tool.
>>
>> I get an error using the functions as well
>>
>> org-recalculate-all-tables:
>> org-recalculate-all-tables: Wrong number of arguments: (lambda (function)
>> "Apply FUNCTION to the start of all tables in the buffer." (save-excursion
>> (save-restriction (widen) (goto-char (point-min)) (while (re-search-forward
>> org-table-any-line-regexp nil t) (message "Mapping tables: %d%%" (/ (* 100.0
>> (point)) (buffer-size))) (beginning-of-line 1) (when (looking-at
>> org-table-line-regexp) (save-excursion (funcall function)) (or (looking-at
>> org-table-line-regexp) (forward-char 1))) (re-search-forward
>> org-table-any-border-regexp nil 1)))) (message "Mapping tables: done")), 2
>>
>> org-iterate-all-tables:
>> while: Wrong number of arguments: (lambda (function) "Apply FUNCTION to
>> the start of all tables in the buffer." (save-excursion (save-restriction
>> (widen) (goto-char (point-min)) (while (re-search-forward
>> org-table-any-line-regexp nil t) (message "Mapping tables: %d%%" (/ (* 100.0
>> (point)) (buffer-size))) (beginning-of-line 1) (when (looking-at
>> org-table-line-regexp) (save-excursion (funcall function)) (or (looking-at
>> org-table-line-regexp) (forward-char 1))) (re-search-forward
>> org-table-any-border-regexp nil 1)))) (message "Mapping tables: done")), 2
>>
>>
>> On 05/05/2010 03:37 PM, Johan Ekh wrote:
>>
>>
>>
>> Any idea what could be wrong?
>>
>>
>>
>> Error meassage:
>>
>> org-recalculate-all-tables: Wrong number of arguments: #[(function)
>> "ŠŒ~ˆebˆÄ ÅÆ#ƒ:
>>
>>
>> Best regards,
>> Johan
>>
>>
>>
>>
>>
>>
>> On Fri, Apr 30, 2010 at 5:03 PM, Carsten Dominik <
>> carsten.dominik@gmail.com> wrote:
>>
>> On Apr 30, 2010, at 4:07 PM, Johan Ekh wrote:
>>
>> Hi all,
>> I have a series of tables in a single file. Each table have some fields
>> that depends on fields
>> in the previous table. Thus, if I change something in the first table, I
>> must go down manually
>> and recalculate (or iterate) each table. Is there a way to recalculate all
>> tables in a file simultaneously?
>>
>>
>> Hi Johan,
>>
>> This should work if the dependence is only backwards.
>>
>> (defun org-recalculate-all-tables ()
>>  (interactive)
>>  (org-table-map-tables (lambda () (org-table-recalculate t)) t))
>>
>> If you have dependencies in both directions, this might work (untested):
>>
>> (defun org-iterate-all-tables ()
>>  (interactive)
>>  (let* ((imax 10)
>>       (checksum (md5 (buffer-string)))
>>       c1
>>       (i imax))
>>  (catch 'exit
>>    (while (> i 0)
>>      (setq i (1- i))
>>      (org-table-map-tables (lambda () (org-table-recalculate t)) t)
>>      (if (equal checksum (setq c1 (md5 (buffer-string))))
>>          (progn
>>            (message "Convergence after %d iterations" (- imax i))
>>            (throw 'exit t))
>>        (setq checksum c1)))
>>    (error "No convergence after %d iterations" imax))))
>>
>> If it does, this could be added to org-hacks on Worg.
>>
>> HTH
>>
>> - Carsten
>>
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Please use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Please use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>
>> - Carsten
>>
>>
>>
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Please use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>
>>
> - Carsten
>
>
>
>

[-- Attachment #1.2: Type: text/html, Size: 6962 bytes --]

[-- Attachment #2: Type: text/plain, Size: 201 bytes --]

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode