Procházet zdrojové kódy

rename `org-table-truncate-at-newline' to `litorgy-table-truncate-at-newline'

Eric Schulte před 16 roky
rodič
revize
b8ecf9596b
1 změnil soubory, kde provedl 2 přidání a 2 odebrání
  1. 2 2
      litorgy/litorgy-table.el

+ 2 - 2
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="