Column View: Fix bug with capturing column view.

This commit is contained in:
Carsten Dominik 2009-02-06 15:01:36 +01:00
parent c1ecf88788
commit 717c7b22f5
3 changed files with 8 additions and 2 deletions

View File

@ -1,5 +1,11 @@
2009-02-06 Carsten Dominik <carsten.dominik@gmail.com>
* org-colview-xemacs.el (org-columns-capture-view): Copy before
deleting duplicates.
* org-colview.el (org-columns-capture-view): Copy before
deleting duplicates.
* org-exp.el (org-export-preprocess-string): Fix bug when skipping
text before first headline.

View File

@ -1264,7 +1264,7 @@ of fields."
(org-columns-forward-char))
(setq row (nreverse row))
(unless (and skip-empty-rows
(eq 1 (length (delete "" (delete-dups row)))))
(eq 1 (length (delete "" (delete-dups (copy-sequence row))))))
(push row tbl))))
(append (list title 'hline) (nreverse tbl))))
(save-excursion

View File

@ -1058,7 +1058,7 @@ of fields."
row))
(setq row (nreverse row))
(unless (and skip-empty-rows
(eq 1 (length (delete "" (delete-dups row)))))
(eq 1 (length (delete "" (delete-dups (copy-sequence row))))))
(push row tbl))))
(append (list title 'hline) (nreverse tbl)))))