From mboxrd@z Thu Jan 1 00:00:00 1970 From: Matt Price Subject: using flet to suppress meta generation in html export? Date: Tue, 6 Nov 2018 09:16:05 -0500 Message-ID: Mime-Version: 1.0 Content-Type: multipart/alternative; boundary="000000000000988ab60579ffa2f2" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:46870) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gK292-0001vY-Ez for emacs-orgmode@gnu.org; Tue, 06 Nov 2018 09:15:58 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gK28p-00038a-Ui for emacs-orgmode@gnu.org; Tue, 06 Nov 2018 09:15:45 -0500 Received: from mail-io1-xd2b.google.com ([2607:f8b0:4864:20::d2b]:38573) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1gK28o-00032F-8v for emacs-orgmode@gnu.org; Tue, 06 Nov 2018 09:15:39 -0500 Received: by mail-io1-xd2b.google.com with SMTP id q18-v6so9299057iod.5 for ; Tue, 06 Nov 2018 06:15:36 -0800 (PST) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: Org Mode --000000000000988ab60579ffa2f2 Content-Type: text/plain; charset="UTF-8" Hi, I was writing a function to quickly post the ocntents of subtrees to the Canvas Learning Management System. I was trying to strip down the exported HTML to an absolute minimum and had forgotten about the body-only paramter to org-export-as (!!). So, my solution was to try to rebind 'org-html--build-meta-info to always just return "". However, I can't seem to do it properly and I'm wondering if someone can help me figure out what's wrong. It's my first time using cl-flet! And I know there are various approaches, but I odn't understnad whyt this is notworking, when for instance, this does work for me: (cl-flet ((+ (lambda (&rest args) (message "no plus!")))) (+ "whoops")) ;; "no plus!" Meanwhile, here's my non-functional code: (defun org-lms-headline-to-announcement (&optional course) (interactive) (unless course (setq course org-lms-course)) (cl-flet ((org-html--build-meta-info (lambda (&rest args) ""))) ;; (prin1 (symbol-function 'org-html--build-meta-info)) (let* ((org-export-with-toc nil) (org-export-with-smart-quotes nil) (org-html-postamble nil) (org-html-preamble nil) (org-html-xml-declaration nil) (org-html-head-include-scripts nil) (org-html-head-include-default-style nil) ;;(atext (org-export-as 'html t)) (atitle (nth 4 (org-heading-components))) (org-html-klipsify-src nil) (org-export-with-title nil) (courseid (plist-get course :id)) (atitle (nth 4 (org-heading-components))) (atext (org-export-as 'html t nil t)) ) ;; (message "BUILDMETA DEFN") ;; (prin1 (symbol-function 'org-html--build-meta-info)) (message "%s" atext) (org-lms-canvas-json-request (format "courses/%s/discussion_topics" courseid) "POST" `(("title" . ,atitle) ("message" . ,atext) ("is_published" . t) ("is_announcement" . t)))))) (well, I mean, it works now that I am doing body-only! doh! I appreciate any hints, thank you! Matt --000000000000988ab60579ffa2f2 Content-Type: text/html; charset="UTF-8" Content-Transfer-Encoding: base64 PGRpdiBkaXI9Imx0ciI+PGRpdiBkaXI9Imx0ciI+PGRpdiBkaXI9Imx0ciI+PGRpdj5IaSw8L2Rp dj48ZGl2Pjxicj48L2Rpdj48ZGl2Pkkgd2FzIHdyaXRpbmcgYSBmdW5jdGlvbiB0byBxdWlja2x5 IHBvc3QgdGhlIG9jbnRlbnRzIG9mIHN1YnRyZWVzIHRvIHRoZSBDYW52YXMgTGVhcm5pbmcgTWFu YWdlbWVudCBTeXN0ZW0uwqAgSSB3YXMgdHJ5aW5nIHRvIHN0cmlwIGRvd24gdGhlIGV4cG9ydGVk IEhUTUwgdG8gYW4gYWJzb2x1dGUgbWluaW11bSBhbmQgaGFkIGZvcmdvdHRlbiBhYm91dCB0aGUg Ym9keS1vbmx5IHBhcmFtdGVyIHRvIG9yZy1leHBvcnQtYXMgKCEhKS4gU28sIG15IHNvbHV0aW9u IHdhcyB0byB0cnkgdG8gcmViaW5kICYjMzk7b3JnLWh0bWwtLWJ1aWxkLW1ldGEtaW5mbyB0byBh bHdheXMganVzdCByZXR1cm4gJnF1b3Q7JnF1b3Q7LiDCoCBIb3dldmVyLCBJIGNhbiYjMzk7dCBz ZWVtIHRvIGRvIGl0IHByb3Blcmx5IGFuZCBJJiMzOTttIHdvbmRlcmluZyBpZiBzb21lb25lIGNh biBoZWxwIG1lIGZpZ3VyZSBvdXQgd2hhdCYjMzk7cyB3cm9uZy4gSXQmIzM5O3MgbXkgZmlyc3Qg dGltZSB1c2luZyBjbC1mbGV0ISBBbmQgSSBrbm93IHRoZXJlIGFyZSB2YXJpb3VzIGFwcHJvYWNo ZXMsIGJ1dCBJIG9kbiYjMzk7dCB1bmRlcnN0bmFkIHdoeXQgdGhpcyBpcyBub3R3b3JraW5nLCB3 aGVuIGZvciBpbnN0YW5jZSwgdGhpcyBkb2VzIHdvcmsgZm9yIG1lOjwvZGl2PjxkaXY+PGJyPjwv ZGl2PjxkaXY+KGNsLWZsZXQgKCgrPGJyPsKgwqDCoMKgwqDCoMKgwqDCoMKgIChsYW1iZGEgKCZh bXA7cmVzdCBhcmdzKSAobWVzc2FnZSAmcXVvdDtubyBwbHVzISZxdW90OykpKSk8YnI+wqAgKCsg JnF1b3Q7d2hvb3BzJnF1b3Q7KSk8YnI+PC9kaXY+PGRpdj47OyAmcXVvdDtubyBwbHVzISZxdW90 Ozxicj48L2Rpdj48ZGl2Pjxicj48L2Rpdj48ZGl2Pk1lYW53aGlsZSwgaGVyZSYjMzk7cyBtecKg IG5vbi1mdW5jdGlvbmFsIGNvZGU6IDxicj48L2Rpdj48ZGl2Pjxicj48L2Rpdj48ZGl2PihkZWZ1 biBvcmctbG1zLWhlYWRsaW5lLXRvLWFubm91bmNlbWVudCAoJmFtcDtvcHRpb25hbCBjb3Vyc2Up PGJyPsKgIChpbnRlcmFjdGl2ZSk8YnI+wqAgKHVubGVzcyBjb3Vyc2U8YnI+wqDCoMKgIChzZXRx IGNvdXJzZSBvcmctbG1zLWNvdXJzZSkpPGJyPsKgIChjbC1mbGV0ICgob3JnLWh0bWwtLWJ1aWxk LW1ldGEtaW5mbzxicj7CoMKgwqDCoMKgwqDCoMKgwqDCoMKgIChsYW1iZGEgKCZhbXA7cmVzdCBh cmdzKSAmcXVvdDsmcXVvdDspKSk8YnI+wqDCoMKgwqDCoMKgwqDCoMKgIDs7IChwcmluMSAoc3lt Ym9sLWZ1bmN0aW9uwqAgJiMzOTtvcmctaHRtbC0tYnVpbGQtbWV0YS1pbmZvKSk8YnI+wqDCoMKg wqDCoMKgwqDCoMKgIChsZXQqICgob3JnLWV4cG9ydC13aXRoLXRvYyBuaWwpPGJyPsKgwqDCoMKg wqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgIChvcmctZXhwb3J0LXdpdGgtc21hcnQtcXVvdGVzIG5p bCk8YnI+wqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqAgKG9yZy1odG1sLXBvc3RhbWJs ZSBuaWwpPGJyPsKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgIChvcmctaHRtbC1wcmVh bWJsZSBuaWwpPGJyPsKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgIChvcmctaHRtbC14 bWwtZGVjbGFyYXRpb24gbmlsKTxicj7CoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoCAo b3JnLWh0bWwtaGVhZC1pbmNsdWRlLXNjcmlwdHMgbmlsKTxicj7CoMKgwqDCoMKgwqDCoMKgwqDC oMKgwqDCoMKgwqDCoCAob3JnLWh0bWwtaGVhZC1pbmNsdWRlLWRlZmF1bHQtc3R5bGUgbmlsKTxi cj7CoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoCA7OyhhdGV4dCAob3JnLWV4cG9ydC1h cyAmIzM5O2h0bWwgdCkpPGJyPsKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgIChhdGl0 bGUgKG50aCA0IChvcmctaGVhZGluZy1jb21wb25lbnRzKSkpPGJyPsKgwqDCoMKgwqDCoMKgwqDC oMKgwqDCoMKgwqDCoMKgIChvcmctaHRtbC1rbGlwc2lmeS1zcmMgbmlsKTxicj7CoMKgwqDCoMKg wqDCoMKgwqDCoMKgwqDCoMKgwqDCoCAob3JnLWV4cG9ydC13aXRoLXRpdGxlIG5pbCk8YnI+wqDC oMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqAgKGNvdXJzZWlkIChwbGlzdC1nZXQgY291cnNl IDppZCkpPGJyPsKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgIChhdGl0bGUgKG50aCA0 IChvcmctaGVhZGluZy1jb21wb25lbnRzKSkpPGJyPsKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKg wqDCoMKgIChhdGV4dCAob3JnLWV4cG9ydC1hcyAmIzM5O2h0bWwgdCBuaWwgdCkpPGJyPsKgwqDC oMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgICk8YnI+wqDCoMKgwqDCoMKgwqDCoMKgwqDCoCA7 OyAobWVzc2FnZSAmcXVvdDtCVUlMRE1FVEEgREVGTiZxdW90Oyk8YnI+wqDCoMKgwqDCoMKgwqDC oMKgwqDCoCA7OyAocHJpbjEgKHN5bWJvbC1mdW5jdGlvbsKgICYjMzk7b3JnLWh0bWwtLWJ1aWxk LW1ldGEtaW5mbykpPGJyPsKgwqDCoMKgwqDCoMKgwqDCoMKgwqAgKG1lc3NhZ2UgJnF1b3Q7JXMm cXVvdDsgYXRleHQpPGJyPsKgwqDCoMKgwqDCoMKgwqDCoMKgwqAgKG9yZy1sbXMtY2FudmFzLWpz b24tcmVxdWVzdDxicj7CoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqAgKGZvcm1hdMKgICZxdW90O2Nv dXJzZXMvJXMvZGlzY3Vzc2lvbl90b3BpY3MmcXVvdDsgY291cnNlaWQpICZxdW90O1BPU1QmcXVv dDs8YnI+wqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgIGAoKCZxdW90O3RpdGxlJnF1b3Q7IC4gLGF0 aXRsZSk8YnI+wqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoCAoJnF1b3Q7bWVzc2FnZSZxdW90 OyAuICxhdGV4dCk8YnI+wqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoCAoJnF1b3Q7aXNfcHVi bGlzaGVkJnF1b3Q7IC4gdCk8YnI+wqDCoMKgwqDCoMKgwqDCoMKgwqDCoMKgwqDCoCAoJnF1b3Q7 aXNfYW5ub3VuY2VtZW50JnF1b3Q7IC4gdCkpKSkpKTwvZGl2PjxkaXY+PGJyPjwvZGl2PjxkaXY+ KHdlbGwsIEkgbWVhbiwgaXQgd29ya3Mgbm93IHRoYXQgSSBhbSBkb2luZyBib2R5LW9ubHkhIGRv aCE8L2Rpdj48ZGl2Pjxicj48L2Rpdj48ZGl2PkkgYXBwcmVjaWF0ZSBhbnkgaGludHMsIHRoYW5r IHlvdSE8L2Rpdj48ZGl2Pk1hdHQ8YnI+PC9kaXY+PC9kaXY+PC9kaXY+PC9kaXY+DQo= --000000000000988ab60579ffa2f2--