anchor.diff:        (string-capitalize (symbol-name site-symbol))))
   
   (defhtml sociallink (site url &optional custom-name)
  -  (:a :class "header rightlink"
  -      :target "_blank"
  -      :href url
  -      :title (site-symbol-to-name site custom-name)
  -      (:span :class (site-symbol-to-fontawesome-class site))))
  +  (:span :style "padding: 3px;"
  +         (link (:span :class (site-symbol-to-fontawesome-class site))
  +               url
  +               :new-tab t))
  +
  +  ;; (:a :class "header rightlink"
  +  ;;     :target "_blank"
  +  ;;     :href url
  +  ;;     :title (site-symbol-to-name site custom-name)
  +  ;;     (:span :class (site-symbol-to-fontawesome-class site)))
  +  )
   
   (defhtml rightlink (label)
  -  (:a :class "header rightlink"
  -      :href (concatenate 'string
  -                         "/"
  -                         (string-downcase label))
  -      label))
  +  (:span :style "padding: 3px;" (link (string-downcase label) "/")))
   
   (defun print-username (post-id)
     (execute-query-one user "SELECT UserName,
  
positive.code:             user-status-id
              user-status-id)))
  
  (defmacro row (&body body)
    `(with-html
       (:div :class "row"
  
negative.code: ;; -*- coding:utf-8 -*-
  (in-package :net.ignorama.web)
  
  (defparameter *ignorama-purple* "#330066")
  (defparameter *background-color* "#E8E8E8")
  (defparameter *header-text-color* "white")
  
  (defparameter *css* "
  body {
      background-color: #E8E8E8;
  }
  
  a:link {
      color: #663399;
  }
  
  a:visited {
      color: #663399;
  }
  
  a:hover {
      color: #663399;
  }
  
  a:active {
      color: #663399;
  }
  
  .header a:link {
      text-decoration: none;
      color: white;
  }
  
  .header a:visited {
      text-decoration: none;
      color: white;
  }
  
  .header a:hover {
      text-decoration: none;
      color: white;
  }
  
  .header a:active {
      text-decoration: none;
      color: white;
  }
  
  ul.dropdown-menu-form {
      padding: 5px 10px 0;
      max-height: 300px;
      overflow-y: scroll;
  }
  
  .btn-default {
      text-shadow: 0px 1px 0px #FFF;
      background-image: none;
      background-repeat: repeat-x;
      border-color: #CCC;
      -webkit-border-radius: 0 !important;
      -moz-border-radius: 0 !important;
      border-radius: 0 !important;
      box-shadow: none;
  }
  
  select {
      height:30px;
      text-shadow: 0px 1px 0px #FFF;
      background-image: none;
      background-repeat: repeat-x;
      border-color: #CCC;
      -webkit-border-radius: 0 !important;
      -moz-border-radius: 0 !important;
      border-radius: 0 !important;
      box-shadow: none;
  }
  
  .pagination-sm > li > a, .pagination-sm > li > span,.pagination > .disabled > span, .pagination > .disabled > span:hover, .pagination > .disabled > span:focus, .pagination > .disabled > a, .pagination > .disabled > a:hover, .pagination > .disabled > a:focus {
      text-shadow: 0px 1px 0px #FFF;
      height: 30px;
      background-image: none;
      background-repeat: repeat-x;
      border-color: #CCC;
      -webkit-border-top-right-radius: 0 !important;
      -moz-border-top-right-radius: 0 !important;
      border-top-right-radius: 0 !important;
      -webkit-border-top-left-radius: 0 !important;
      -moz-border-top-left-radius: 0 !important;
      border-top-left-radius: 0 !important;
      -webkit-border-bottom-right-radius: 0 !important;
      -moz-border-bottom-right-radius: 0 !important;
      border-bottom-right-radius: 0 !important;
      -webkit-border-bottom-left-radius: 0 !important;
      -moz-border-bottom-left-radius: 0 !important;
      border-bottom-left-radius: 0 !important;
      box-shadow: none;
  }
  
  .dropdown-menu{
      -webkit-border-radius: 0 !important;
      -moz-border-radius: 0 !important;
      border-radius: 0 !important;
      box-shadow: 0px 1px 6px rgba(0, 0, 0, 0.2);
  }
  
  input[type='checkbox']{
      margin-right: 3px;
  }
  
  input[type='text']{
      margin-bottom: 5px;
  }
  
  label{
      font-weight: 400 !important;
  }
  
  .thread {
      background-color: white;
      padding: 5px;
      border-style: solid;
      border-color: #CCC;
      border-width: 1px;
  }
  ")
  
  ;;; site setup
  (defun threads-query (condition)
  