1:- module(conf_swish, []).    2:- use_module(cliopatria(hooks)).

    7:- multifile
    8	user:file_search_path/2,
    9	swish_config:config/2.   10
   11% tell SWISH where to find its parts.   The last clause allows adding an
   12% =examples=  directory  in  the  main   directory  holding  application
   13% specific examples.
   14
   15user:file_search_path(swish_web, web(.)).
   16user:file_search_path(example,   cpacks(swish/examples)).
   17user:file_search_path(example,	 examples).
   18
   19% Load swish.  You need this.
   20:- use_module(applications(swish)).   21% Load the authentication hook. When loaded, ClioPatria users with admin
   22% rights can use SWISH without sandboxing security
   23:- use_module(library(swish/cp_authenticate)).   24% Enable user profile management
   25:- use_module(library(swish/plugin/profile)).   26% Enable notifications
   27:- use_module(library(swish/plugin/notify)).   28% Enable logging of SWISH queries and sources if HTTP logging is enabled
   29:- use_module(library(swish/logging)).   30% Make side-effect-free RDF predicates safe
   31:- if(exists_source(library(semweb/rdf_sandbox))).   32:- use_module(library(semweb/rdf_sandbox)).   33:- endif.   34% Make the R interface available.
   35% make sure Rserve runs in a good sandbox or only allow for
   36% authenticated access.  See https://github.com/JanWielemaker/rserve-sandbox
   37:- if(exists_source(library(r/r_call))).   38:- use_module(user:library(swish/r_swish)).   39:- use_module(library(r/r_sandbox)).   40:- endif.   41
   42% Allows users to extend the Examples menu by ticking the Example
   43% checkbox.
   44swish_config:config(community_examples, true).
   45
   46% Uncomment this to make Captitalised words _atoms_.  Variables must
   47% be written as _var.  Requires SWI-Prolog 7.3.27.
   48%:- set_prolog_flag(swish:var_prefix, true).

 cliopatria:menu_item(-Item, -Label) is nondet

Add SWISH to the Query menu.

   54cliopatria:menu_item(300=query/swish, 'SWISH Prolog shell')