From b8ecf9596b3b43a5c7a8ce7e32705ca4c384b1b4 Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Sun, 24 May 2009 10:35:05 -0700 Subject: [PATCH] rename `org-table-truncate-at-newline' to `litorgy-table-truncate-at-newline' --- litorgy/litorgy-table.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/litorgy/litorgy-table.el b/litorgy/litorgy-table.el index 19d8192c6..0fb0051ad 100644 --- a/litorgy/litorgy-table.el +++ b/litorgy/litorgy-table.el @@ -55,7 +55,7 @@ ;;; Code: (require 'litorgy) -(defun org-table-truncate-at-newline (string) +(defun litorgy-table-truncate-at-newline (string) (if (and (stringp string) (string-match "[\n\r]" string)) (concat (substring string 0 (match-beginning 0)) "...") string)) @@ -74,7 +74,7 @@ source code block. results #+end_src" (unless (stringp source-block) (setq source-block (symbol-name source-block))) - (org-table-truncate-at-newline ;; org-table cells can't be multi-line + (litorgy-table-truncate-at-newline ;; org-table cells can't be multi-line (if (and source-block (> (length source-block) 0)) (let ((params (eval `(litorgy-parse-header-arguments (concat ":var results="