From 90051a7ea55acb043434b1c2483b878d602246ba Mon Sep 17 00:00:00 2001 From: Ralph Amissah Date: Fri, 2 Apr 2021 19:37:00 -0400 Subject: org mode (ruby code within) --- org/css.org | 3508 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 3508 insertions(+) create mode 100644 org/css.org (limited to 'org/css.org') diff --git a/org/css.org b/org/css.org new file mode 100644 index 00000000..266c0051 --- /dev/null +++ b/org/css.org @@ -0,0 +1,3508 @@ +-*- mode: org -*- +#+TITLE: sisu css +#+DESCRIPTION: documents - structuring, various output representations & search +#+FILETAGS: :sisu:css: +#+AUTHOR: Ralph Amissah +#+EMAIL: [[mailto:ralph.amissah@gmail.com][ralph.amissah@gmail.com]] +#+COPYRIGHT: Copyright (C) 2015 - 2021 Ralph Amissah +#+LANGUAGE: en +#+STARTUP: content hideblocks hidestars noindent entitiespretty +#+OPTIONS: H:3 num:nil toc:t \n:nil @:t ::t |:t ^:nil _:nil -:t f:t *:t <:t +#+PROPERTY: header-args :exports code +#+PROPERTY: header-args+ :noweb yes +#+PROPERTY: header-args+ :eval no +#+PROPERTY: header-args+ :results no +#+PROPERTY: header-args+ :cache no +#+PROPERTY: header-args+ :padline no + +* css.rb + +#+BEGIN_SRC ruby :tangle "../lib/sisu/css.rb" +# <> +module SiSU_Style + require_relative 'se' # se.rb + require_relative 'html_parts' # html_parts.rb + class CSS_HeadInfo + def initialize(md,ft='html') + @md,@ft=md,ft + @env=SiSU_Env::InfoEnv.new('',md) + @fn_css ||=SiSU_Env::CSS_Default.new + @o_str ||=SiSU_Env::ProcessingSettings.new(md).output_dir_structure + css_copy + end + def stylesheet + def css_path + SiSU_Env::CSS_Stylesheet.new(@md) + end + def css_embed_content + @css_embed_content ||=SiSU_Style::CSS.new + end + def css_embed? + if @ft=='html' \ + && @o_str.dump_or_redirect? + true + else + false + end + end + def css_embed(css) + <<-WOK + + WOK + end + def css_action + css=case @ft + when 'html' + css=css_embed_content.html + css_embed(css) + when 'xhtml' + css_path.xhtml + when 'xml_sax' + css_path.xml_sax + when 'xml_dom' + css_path.xml_dom + when 'xml_docbook' + css_path.xml_docbook + else + css_embed_content.html + end + end + def css_head + (css_embed?) \ + ? css_action + : "#{css_path.html}#{css_path.html_seg}" + end + def css_head_seg + (css_embed?) \ + ? css_action + : css_path.html_seg + end + def css_head_xml + css_action + end + self + end + def css_copy + if @o_str.dump_or_redirect? + css=SiSU_Style::CSS.new + if @o_str.dump? + css_pth="#{@md.opt.opt_act[:dump][:inst]}/#{@env.path.style}" + elsif @o_str.redirect? + css_pth="#{@md.opt.opt_act[:redirect][:inst]}/#{@md.fnb}/#{@env.path.style}" + end + FileUtils::mkdir_p(css_pth) unless FileTest.directory?(css_pth) + case @ft + when 'html' + style=File.new("#{css_pth}/#{@fn_css.html}",'w') + style << css.html + style.close + when 'xhtml' + style=File.new("#{css_pth}/#{@fn_css.xhtml}",'w') + style << css.xhtml + style.close + when 'xml_sax' + style=File.new("#{css_pth}/#{@fn_css.xml_sax}",'w') + style << css.xml_sax + style.close + when 'xml_dom' + style=File.new("#{css_pth}/#{@fn_css.xml_dom}",'w') + style << css.xml_dom + style.close + css_path.xml_dom + when 'xml_docbook' + style=File.new("#{css_pth}/#{@fn_css.xml_docbook}",'w') + style << css.xml_docbook + style.close + css_path.xml_docbook + end + end + end + end + class CSS + include SiSU_Parts_HTML + def fonts + the_font.set_fonts + end + def html_tables #stylesheet for css table_pages +< + + - Copyright: (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, + 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017, 2019, + 2020, 2021, Ralph Amissah, + All Rights Reserved. + + - License: GPL 3 or later: + + SiSU, a framework for document structuring, publishing and search + + Copyright (C) Ralph Amissah + + This program is free software: you can redistribute it and/or modify it + under the terms of the GNU General Public License as published by the Free + Software Foundation, either version 3 of the License, or (at your option) + any later version. + + This program is distributed in the hope that it will be useful, but WITHOUT + ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or + FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for + more details. + + You should have received a copy of the GNU General Public License along with + this program. If not, see . + + If you have Internet connection, the latest version of the GPL should be + available at these locations: + + + + + + - SiSU uses: + - Standard SiSU markup syntax, + - Standard SiSU meta-markup syntax, and the + - Standard SiSU object citation numbering and system + + - Homepages: + + + - Git + + + +#+END_SRC -- cgit v1.2.3 From dd6bd13ea98860ce840b53ea4333c529a429b8d5 Mon Sep 17 00:00:00 2001 From: Ralph Amissah Date: Mon, 8 Nov 2021 15:29:53 -0500 Subject: org, create output path if necessary, should not be --- org/css.org | 1 + 1 file changed, 1 insertion(+) (limited to 'org/css.org') diff --git a/org/css.org b/org/css.org index 266c0051..c3898ae9 100644 --- a/org/css.org +++ b/org/css.org @@ -14,6 +14,7 @@ #+PROPERTY: header-args+ :results no #+PROPERTY: header-args+ :cache no #+PROPERTY: header-args+ :padline no +#+PROPERTY: header-args+ :mkdirp yes * css.rb -- cgit v1.2.3 From ff0951418e0c4355ac0235a0ea283f61f9462a3d Mon Sep 17 00:00:00 2001 From: Ralph Amissah Date: Wed, 10 Nov 2021 13:48:18 -0500 Subject: rb file headers change, org-mode tangle whitespace issue --- org/css.org | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'org/css.org') diff --git a/org/css.org b/org/css.org index c3898ae9..7551999b 100644 --- a/org/css.org +++ b/org/css.org @@ -19,7 +19,7 @@ * css.rb #+BEGIN_SRC ruby :tangle "../lib/sisu/css.rb" -# <> +<> module SiSU_Style require_relative 'se' # se.rb require_relative 'html_parts' # html_parts.rb @@ -3454,7 +3454,8 @@ __END__ #+NAME: sisu_document_header #+BEGIN_SRC text -encoding: utf-8 +#encoding: utf-8 +=begin - Name: SiSU - Description: documents, structuring, processing, publishing, search @@ -3506,4 +3507,5 @@ encoding: utf-8 +=end #+END_SRC -- cgit v1.2.3 From 0a87b8fbd5b013b8da07f6bc30360ff735217367 Mon Sep 17 00:00:00 2001 From: Ralph Amissah Date: Wed, 9 Mar 2022 21:05:51 -0500 Subject: org-mode and ruby file headers modified - org-mode file headers modified to preserve org-mode ruby syntax highlighting --- org/css.org | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'org/css.org') diff --git a/org/css.org b/org/css.org index 7551999b..370858c0 100644 --- a/org/css.org +++ b/org/css.org @@ -18,8 +18,9 @@ * css.rb -#+BEGIN_SRC ruby :tangle "../lib/sisu/css.rb" -<> +#+HEADER: :tangle "../lib/sisu/css.rb" +#+BEGIN_SRC ruby +#<> module SiSU_Style require_relative 'se' # se.rb require_relative 'html_parts' # html_parts.rb @@ -3454,8 +3455,7 @@ __END__ #+NAME: sisu_document_header #+BEGIN_SRC text -#encoding: utf-8 -=begin +encoding: utf-8 - Name: SiSU - Description: documents, structuring, processing, publishing, search @@ -3507,5 +3507,4 @@ __END__ -=end #+END_SRC -- cgit v1.2.3