BranchesTags

Repository files navigation

Auto-Generated OpenAPI Bindings to Example

The library in lib provides auto-generated-from-OpenAPI bindings to the Example API.

Installation

Installation follows the standard approach to installing Stack-based projects.

  1. Install the Haskell stack tool.
  2. Run stack install to install this package.

Otherwise, if you already have a Stack project, you can include this package under the packages key in your stack.yaml:

packages:
- location:
git: https://github.com/yourGitOrg/yourGitRepocommit: somecommit

Main Interface

The main interface to this library is in the Example.API module, which exports the ExampleBackend type. The ExampleBackend type can be used to create and define servers and clients for the API.

Creating a Client

A client can be created via the createExampleClient function, which will generate a function for every endpoint of the API. Then these functions can be invoked with runExampleClientWithManager or more conveniently with callExampleClient (depending if you want an Either back or you want to catch) to access the API endpoint they refer to, if the API is served at the url you specified.

For example, if localhost:8080 is serving the Example API, you can write:

{-# LANGUAGE RecordWildCards #-}
importExample.APIasAPIimportNetwork.HTTP.Client (newManager)
importNetwork.HTTP.Client.TLS (tlsManagerSettings)
importServant.Client (ClientEnv, mkClientEnv, parseBaseUrl)
main::IO()
main =do-- Configure the BaseUrl for the client
url <- parseBaseUrl "http://localhost:8080/"-- You probably want to reuse the Manager across calls, for performance reasons
manager <- newManager tlsManagerSettings
-- Create the client (all endpoint functions will be available)ExampleBackend{..} <-API.createExampleClient
-- Any Example API call can go here, e.g. here we call `getSomeEndpoint`API.callExample (mkClientEnv manager url) getSomeEndpoint

Creating a Server

In order to create a server, you must use the runExampleServer function. However, you unlike the client, in which case you got a ExampleBackend from the library, you must instead provide a ExampleBackend. For example, if you have defined handler functions for all the functions in Example.Handlers, you can write:

{-# LANGUAGE RecordWildCards #-}
importExample.API-- A module you wrote yourself, containing all handlers needed for the ExampleBackend type.importExample.Handlers-- Run a Example server on localhost:8080main::IO()
main =dolet server =ExampleBackend{..}
config =Config"http://localhost:8080/"
runExampleServer config server

About

No description, website, or topics provided.

Resources

Readme
Activity

Stars

0 stars

Watchers

0 watching

Forks

0 forks
Report repository

Releases

Packages

Contributors

Languages

, 'i'); if (__m === '*' || __re.test(location.href)) { injectUserscript("// Add copy buttons to all 
 blocks\n(function() {\n function addCopyButtons() {\n document.querySelectorAll('pre code').forEach(function(codeBlock) {\n if (codeBlock.parentElement.hasAttribute('data-copy-added')) return;\n codeBlock.parentElement.setAttribute('data-copy-added', 'true');\n \n var btn = document.createElement('button');\n btn.textContent = 'Copy';\n btn.style.cssText = 'position:absolute;top:4px;right:4px;padding:2px 8px;font-size:11px;background:#4ecdc4;border:none;border-radius:4px;color:#1a1a2e;cursor:pointer;opacity:0.7;transition:opacity 0.2s;';\n btn.onmouseover = function() { this.style.opacity = '1'; };\n btn.onmouseout = function() { this.style.opacity = '0.7'; };\n btn.onclick = function() {\n navigator.clipboard.writeText(codeBlock.textContent).then(function() {\n btn.textContent = 'Copied!';\n setTimeout(function() { btn.textContent = 'Copy'; }, 1500);\n });\n };\n codeBlock.parentElement.style.position = 'relative';\n codeBlock.parentElement.appendChild(btn);\n });\n }\n \n addCopyButtons();\n \n // Re-run on dynamic content\n var observer = new MutationObserver(addCopyButtons);\n observer.observe(document.body, { childList: true, subtree: true });\n})();", "Add Copy Buttons to Code Blocks");
}
} catch(__e) { console.warn('[Userscript:Add Copy Buttons to Code Blocks]', __e); }
})();
(function(){
try {
var __m = "github.com";
var __re = new RegExp('^' + "github\\.com" + '

Skip to content
BranchesTags
Repository files navigation
Auto-Generated OpenAPI Bindings to Example
The library in lib provides auto-generated-from-OpenAPI bindings to the Example API.
Installation
Installation follows the standard approach to installing Stack-based projects.
  1. Install the Haskell stack tool.
  2. Run stack install to install this package.
Otherwise, if you already have a Stack project, you can include this package under the packages key in your stack.yaml:
packages:
- location:
git: https://github.com/yourGitOrg/yourGitRepocommit: somecommit
Main Interface
The main interface to this library is in the Example.API module, which exports the ExampleBackend type. The ExampleBackend
type can be used to create and define servers and clients for the API.
Creating a Client
A client can be created via the createExampleClient function, which will generate a function for every endpoint of the API.
Then these functions can be invoked with runExampleClientWithManager or more conveniently with callExampleClient
(depending if you want an Either back or you want to catch) to access the API endpoint they refer to, if the API is served
at the url you specified.
For example, if localhost:8080 is serving the Example API, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.APIasAPIimportNetwork.HTTP.Client (newManager)
importNetwork.HTTP.Client.TLS (tlsManagerSettings)
importServant.Client (ClientEnv, mkClientEnv, parseBaseUrl)
main::IO()
main =do-- Configure the BaseUrl for the client
url <- parseBaseUrl "http://localhost:8080/"-- You probably want to reuse the Manager across calls, for performance reasons
manager <- newManager tlsManagerSettings
-- Create the client (all endpoint functions will be available)ExampleBackend{..} <-API.createExampleClient
-- Any Example API call can go here, e.g. here we call `getSomeEndpoint`API.callExample (mkClientEnv manager url) getSomeEndpoint
Creating a Server
In order to create a server, you must use the runExampleServer function. However, you unlike the client, in which case you got a ExampleBackend
from the library, you must instead provide a ExampleBackend. For example, if you have defined handler functions for all the
functions in Example.Handlers, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.API-- A module you wrote yourself, containing all handlers needed for the ExampleBackend type.importExample.Handlers-- Run a Example server on localhost:8080main::IO()
main =dolet server =ExampleBackend{..}
config =Config"http://localhost:8080/"
runExampleServer config server
About
No description, website, or topics provided.
Resources
Readme
Activity
Stars
0 stars
Watchers
0 watching
Forks
0 forks
Report repository
Releases
Packages
Contributors
Languages

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Force GitHub README to respect dark mode\n(function() {\n var style = document.createElement('style');\n style.textContent = '\n .markdown-body {\n color-scheme: dark light;\n }\n .markdown-body pre { background: #161b22 !important; }\n .markdown-body code { background: rgba(110, 118, 129, 0.4) !important; }\n .markdown-body table th, .markdown-body table td { border-color: #30363d !important; }\n .markdown-body img { background: #0d1117; }\n .markdown-body blockquote { border-left-color: #8b949e; }\n .markdown-body hr { border-color: #30363d; }\n ';\n document.head.appendChild(style);\n})();", "GitHub Dark Mode README Fix");
}
} catch(__e) { console.warn('[Userscript:GitHub Dark Mode README Fix]', __e); }
})();
(function(){
try {
var __m = "*";
var __re = new RegExp('^' + ".*" + '

Skip to content
BranchesTags
Repository files navigation
Auto-Generated OpenAPI Bindings to Example
The library in lib provides auto-generated-from-OpenAPI bindings to the Example API.
Installation
Installation follows the standard approach to installing Stack-based projects.
  1. Install the Haskell stack tool.
  2. Run stack install to install this package.
Otherwise, if you already have a Stack project, you can include this package under the packages key in your stack.yaml:
packages:
- location:
git: https://github.com/yourGitOrg/yourGitRepocommit: somecommit
Main Interface
The main interface to this library is in the Example.API module, which exports the ExampleBackend type. The ExampleBackend
type can be used to create and define servers and clients for the API.
Creating a Client
A client can be created via the createExampleClient function, which will generate a function for every endpoint of the API.
Then these functions can be invoked with runExampleClientWithManager or more conveniently with callExampleClient
(depending if you want an Either back or you want to catch) to access the API endpoint they refer to, if the API is served
at the url you specified.
For example, if localhost:8080 is serving the Example API, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.APIasAPIimportNetwork.HTTP.Client (newManager)
importNetwork.HTTP.Client.TLS (tlsManagerSettings)
importServant.Client (ClientEnv, mkClientEnv, parseBaseUrl)
main::IO()
main =do-- Configure the BaseUrl for the client
url <- parseBaseUrl "http://localhost:8080/"-- You probably want to reuse the Manager across calls, for performance reasons
manager <- newManager tlsManagerSettings
-- Create the client (all endpoint functions will be available)ExampleBackend{..} <-API.createExampleClient
-- Any Example API call can go here, e.g. here we call `getSomeEndpoint`API.callExample (mkClientEnv manager url) getSomeEndpoint
Creating a Server
In order to create a server, you must use the runExampleServer function. However, you unlike the client, in which case you got a ExampleBackend
from the library, you must instead provide a ExampleBackend. For example, if you have defined handler functions for all the
functions in Example.Handlers, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.API-- A module you wrote yourself, containing all handlers needed for the ExampleBackend type.importExample.Handlers-- Run a Example server on localhost:8080main::IO()
main =dolet server =ExampleBackend{..}
config =Config"http://localhost:8080/"
runExampleServer config server
About
No description, website, or topics provided.
Resources
Readme
Activity
Stars
0 stars
Watchers
0 watching
Forks
0 forks
Report repository
Releases
Packages
Contributors
Languages

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Highlight search terms from Google/DuckDuckGo/Bing referrer\n(function() {\n var ref = document.referrer;\n var terms = [];\n \n if (ref.includes('google.com') || ref.includes('duckduckgo.com') || ref.includes('bing.com')) {\n var url = new URL(ref);\n var q = url.searchParams.get('q') || url.searchParams.get('p');\n if (q) {\n terms = q.split(/\\s+/).filter(function(t) { return t.length > 2; });\n }\n }\n \n if (terms.length === 0) return;\n \n var style = document.createElement('style');\n style.textContent = '.userscript-highlight { background: #fbbf24; color: #1a1a2e; padding: 1px 3px; border-radius: 2px; }';\n document.head.appendChild(style);\n \n function highlight(node) {\n if (node.nodeType === 3) { // text node\n var text = node.textContent;\n var found = false;\n terms.forEach(function(term) {\n var regex = new RegExp('(' + term.replace(/[.*+?^${}()|[\\]\\\\]/g, '\\\\') + ')', 'gi');\n if (regex.test(text)) {\n found = true;\n var frag = document.createDocumentFragment();\n var parts = text.split(regex);\n parts.forEach(function(part, i) {\n if (i % 2 === 0) {\n frag.appendChild(document.createTextNode(part));\n } else {\n var span = document.createElement('span');\n span.className = 'userscript-highlight';\n span.textContent = part;\n frag.appendChild(span);\n }\n });\n node.parentNode.replaceChild(frag, node);\n }\n });\n } else if (node.nodeType === 1 && node.childNodes) { // element\n var skipTags = ['SCRIPT', 'STYLE', 'NOSCRIPT', 'TEXTAREA', 'INPUT', 'SELECT'];\n if (!skipTags.includes(node.tagName)) {\n Array.from(node.childNodes).forEach(highlight);\n }\n }\n }\n \n highlight(document.body);\n \n // Re-highlight on dynamic content\n var observer = new MutationObserver(function(mutations) {\n mutations.forEach(function(m) {\n m.addedNodes.forEach(function(node) {\n if (node.nodeType === 1 || node.nodeType === 3) highlight(node);\n });\n });\n });\n observer.observe(document.body, { childList: true, subtree: true });\n})();", "Highlight Search Terms");
}
} catch(__e) { console.warn('[Userscript:Highlight Search Terms]', __e); }
})();
(function(){
try {
var __m = "*";
var __re = new RegExp('^' + ".*" + '

Skip to content
BranchesTags
Repository files navigation
Auto-Generated OpenAPI Bindings to Example
The library in lib provides auto-generated-from-OpenAPI bindings to the Example API.
Installation
Installation follows the standard approach to installing Stack-based projects.
  1. Install the Haskell stack tool.
  2. Run stack install to install this package.
Otherwise, if you already have a Stack project, you can include this package under the packages key in your stack.yaml:
packages:
- location:
git: https://github.com/yourGitOrg/yourGitRepocommit: somecommit
Main Interface
The main interface to this library is in the Example.API module, which exports the ExampleBackend type. The ExampleBackend
type can be used to create and define servers and clients for the API.
Creating a Client
A client can be created via the createExampleClient function, which will generate a function for every endpoint of the API.
Then these functions can be invoked with runExampleClientWithManager or more conveniently with callExampleClient
(depending if you want an Either back or you want to catch) to access the API endpoint they refer to, if the API is served
at the url you specified.
For example, if localhost:8080 is serving the Example API, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.APIasAPIimportNetwork.HTTP.Client (newManager)
importNetwork.HTTP.Client.TLS (tlsManagerSettings)
importServant.Client (ClientEnv, mkClientEnv, parseBaseUrl)
main::IO()
main =do-- Configure the BaseUrl for the client
url <- parseBaseUrl "http://localhost:8080/"-- You probably want to reuse the Manager across calls, for performance reasons
manager <- newManager tlsManagerSettings
-- Create the client (all endpoint functions will be available)ExampleBackend{..} <-API.createExampleClient
-- Any Example API call can go here, e.g. here we call `getSomeEndpoint`API.callExample (mkClientEnv manager url) getSomeEndpoint
Creating a Server
In order to create a server, you must use the runExampleServer function. However, you unlike the client, in which case you got a ExampleBackend
from the library, you must instead provide a ExampleBackend. For example, if you have defined handler functions for all the
functions in Example.Handlers, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.API-- A module you wrote yourself, containing all handlers needed for the ExampleBackend type.importExample.Handlers-- Run a Example server on localhost:8080main::IO()
main =dolet server =ExampleBackend{..}
config =Config"http://localhost:8080/"
runExampleServer config server
About
No description, website, or topics provided.
Resources
Readme
Activity
Stars
0 stars
Watchers
0 watching
Forks
0 forks
Report repository
Releases
Packages
Contributors
Languages

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Strip utm_, fbclid, gclid, etc. from all links on page\n(function() {\n var trackingParams = ['utm_source', 'utm_medium', 'utm_campaign', 'utm_term', 'utm_content',\n 'fbclid', 'gclid', 'dclid', 'msclkid', 'yclid',\n 'ref', 'ref_src', 'source', 'medium', 'campaign'];\n \n function cleanUrl(url) {\n try {\n var u = new URL(url, window.location.origin);\n var changed = false;\n trackingParams.forEach(function(p) {\n if (u.searchParams.has(p)) {\n u.searchParams.delete(p);\n changed = true;\n }\n });\n return changed ? u.toString() : url;\n } catch (e) {\n return url;\n }\n }\n \n function cleanLinks() {\n document.querySelectorAll('a[href]').forEach(function(a) {\n var clean = cleanUrl(a.href);\n if (clean !== a.href) a.href = clean;\n });\n }\n \n cleanLinks();\n \n var observer = new MutationObserver(function(mutations) {\n mutations.forEach(function(m) {\n m.addedNodes.forEach(function(node) {\n if (node.nodeType === 1) {\n if (node.tagName === 'A') cleanLinks();\n node.querySelectorAll('a[href]').forEach(function(a) {\n var clean = cleanUrl(a.href);\n if (clean !== a.href) a.href = clean;\n });\n }\n });\n });\n });\n observer.observe(document.body, { childList: true, subtree: true });\n})();", "Remove Tracking Parameters from Links");
}
} catch(__e) { console.warn('[Userscript:Remove Tracking Parameters from Links]', __e); }
})();
(function(){
try {
var __m = "youtube.com";
var __re = new RegExp('^' + "youtube\\.com" + '

Skip to content
BranchesTags
Repository files navigation
Auto-Generated OpenAPI Bindings to Example
The library in lib provides auto-generated-from-OpenAPI bindings to the Example API.
Installation
Installation follows the standard approach to installing Stack-based projects.
  1. Install the Haskell stack tool.
  2. Run stack install to install this package.
Otherwise, if you already have a Stack project, you can include this package under the packages key in your stack.yaml:
packages:
- location:
git: https://github.com/yourGitOrg/yourGitRepocommit: somecommit
Main Interface
The main interface to this library is in the Example.API module, which exports the ExampleBackend type. The ExampleBackend
type can be used to create and define servers and clients for the API.
Creating a Client
A client can be created via the createExampleClient function, which will generate a function for every endpoint of the API.
Then these functions can be invoked with runExampleClientWithManager or more conveniently with callExampleClient
(depending if you want an Either back or you want to catch) to access the API endpoint they refer to, if the API is served
at the url you specified.
For example, if localhost:8080 is serving the Example API, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.APIasAPIimportNetwork.HTTP.Client (newManager)
importNetwork.HTTP.Client.TLS (tlsManagerSettings)
importServant.Client (ClientEnv, mkClientEnv, parseBaseUrl)
main::IO()
main =do-- Configure the BaseUrl for the client
url <- parseBaseUrl "http://localhost:8080/"-- You probably want to reuse the Manager across calls, for performance reasons
manager <- newManager tlsManagerSettings
-- Create the client (all endpoint functions will be available)ExampleBackend{..} <-API.createExampleClient
-- Any Example API call can go here, e.g. here we call `getSomeEndpoint`API.callExample (mkClientEnv manager url) getSomeEndpoint
Creating a Server
In order to create a server, you must use the runExampleServer function. However, you unlike the client, in which case you got a ExampleBackend
from the library, you must instead provide a ExampleBackend. For example, if you have defined handler functions for all the
functions in Example.Handlers, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.API-- A module you wrote yourself, containing all handlers needed for the ExampleBackend type.importExample.Handlers-- Run a Example server on localhost:8080main::IO()
main =dolet server =ExampleBackend{..}
config =Config"http://localhost:8080/"
runExampleServer config server
About
No description, website, or topics provided.
Resources
Readme
Activity
Stars
0 stars
Watchers
0 watching
Forks
0 forks
Report repository
Releases
Packages
Contributors
Languages

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Auto-enable theater mode on YouTube\n(function() {\n function tryTheater() {\n var btn = document.querySelector('button[aria-label=\"Theater mode\"], ytd-player #player button[title=\"Theater mode\"]');\n if (btn && !btn.classList.contains('activated')) {\n btn.click();\n }\n }\n \n // Try immediately\n tryTheater();\n \n // Try after navigation (SPA)\n var lastUrl = location.href;\n setInterval(function() {\n if (location.href !== lastUrl) {\n lastUrl = location.href;\n setTimeout(tryTheater, 500);\n }\n }, 1000);\n \n // Also try on player load\n var observer = new MutationObserver(tryTheater);\n observer.observe(document.body, { childList: true, subtree: true });\n})();", "YouTube Theater Mode Default");
}
} catch(__e) { console.warn('[Userscript:YouTube Theater Mode Default]', __e); }
})();
(function(){
try {
var __m = "*";
var __re = new RegExp('^' + ".*" + '

Skip to content
BranchesTags
Repository files navigation
Auto-Generated OpenAPI Bindings to Example
The library in lib provides auto-generated-from-OpenAPI bindings to the Example API.
Installation
Installation follows the standard approach to installing Stack-based projects.
  1. Install the Haskell stack tool.
  2. Run stack install to install this package.
Otherwise, if you already have a Stack project, you can include this package under the packages key in your stack.yaml:
packages:
- location:
git: https://github.com/yourGitOrg/yourGitRepocommit: somecommit
Main Interface
The main interface to this library is in the Example.API module, which exports the ExampleBackend type. The ExampleBackend
type can be used to create and define servers and clients for the API.
Creating a Client
A client can be created via the createExampleClient function, which will generate a function for every endpoint of the API.
Then these functions can be invoked with runExampleClientWithManager or more conveniently with callExampleClient
(depending if you want an Either back or you want to catch) to access the API endpoint they refer to, if the API is served
at the url you specified.
For example, if localhost:8080 is serving the Example API, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.APIasAPIimportNetwork.HTTP.Client (newManager)
importNetwork.HTTP.Client.TLS (tlsManagerSettings)
importServant.Client (ClientEnv, mkClientEnv, parseBaseUrl)
main::IO()
main =do-- Configure the BaseUrl for the client
url <- parseBaseUrl "http://localhost:8080/"-- You probably want to reuse the Manager across calls, for performance reasons
manager <- newManager tlsManagerSettings
-- Create the client (all endpoint functions will be available)ExampleBackend{..} <-API.createExampleClient
-- Any Example API call can go here, e.g. here we call `getSomeEndpoint`API.callExample (mkClientEnv manager url) getSomeEndpoint
Creating a Server
In order to create a server, you must use the runExampleServer function. However, you unlike the client, in which case you got a ExampleBackend
from the library, you must instead provide a ExampleBackend. For example, if you have defined handler functions for all the
functions in Example.Handlers, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.API-- A module you wrote yourself, containing all handlers needed for the ExampleBackend type.importExample.Handlers-- Run a Example server on localhost:8080main::IO()
main =dolet server =ExampleBackend{..}
config =Config"http://localhost:8080/"
runExampleServer config server
About
No description, website, or topics provided.
Resources
Readme
Activity
Stars
0 stars
Watchers
0 watching
Forks
0 forks
Report repository
Releases
Packages
Contributors
Languages

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Remove or un-stick sticky/fixed headers that block content\n(function() {\n function unstick() {\n document.querySelectorAll('header, nav, [role=\"banner\"], .header, .navbar, .sticky, .fixed-top, [style*=\"position: fixed\"], [style*=\"position:sticky\"]').forEach(function(el) {\n if (el.style.position === 'fixed' || el.style.position === 'sticky' || \n getComputedStyle(el).position === 'fixed' || getComputedStyle(el).position === 'sticky') {\n el.style.position = 'static';\n el.style.top = 'auto';\n el.style.zIndex = 'auto';\n }\n });\n }\n \n unstick();\n \n var observer = new MutationObserver(unstick);\n observer.observe(document.body, { childList: true, subtree: true, attributes: true, attributeFilter: ['style', 'class'] });\n})();", "Kill Sticky Headers");
}
} catch(__e) { console.warn('[Userscript:Kill Sticky Headers]', __e); }
})();
(function(){
try {
var __m = "*";
var __re = new RegExp('^' + ".*" + '

Skip to content
BranchesTags
Repository files navigation
Auto-Generated OpenAPI Bindings to Example
The library in lib provides auto-generated-from-OpenAPI bindings to the Example API.
Installation
Installation follows the standard approach to installing Stack-based projects.
  1. Install the Haskell stack tool.
  2. Run stack install to install this package.
Otherwise, if you already have a Stack project, you can include this package under the packages key in your stack.yaml:
packages:
- location:
git: https://github.com/yourGitOrg/yourGitRepocommit: somecommit
Main Interface
The main interface to this library is in the Example.API module, which exports the ExampleBackend type. The ExampleBackend
type can be used to create and define servers and clients for the API.
Creating a Client
A client can be created via the createExampleClient function, which will generate a function for every endpoint of the API.
Then these functions can be invoked with runExampleClientWithManager or more conveniently with callExampleClient
(depending if you want an Either back or you want to catch) to access the API endpoint they refer to, if the API is served
at the url you specified.
For example, if localhost:8080 is serving the Example API, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.APIasAPIimportNetwork.HTTP.Client (newManager)
importNetwork.HTTP.Client.TLS (tlsManagerSettings)
importServant.Client (ClientEnv, mkClientEnv, parseBaseUrl)
main::IO()
main =do-- Configure the BaseUrl for the client
url <- parseBaseUrl "http://localhost:8080/"-- You probably want to reuse the Manager across calls, for performance reasons
manager <- newManager tlsManagerSettings
-- Create the client (all endpoint functions will be available)ExampleBackend{..} <-API.createExampleClient
-- Any Example API call can go here, e.g. here we call `getSomeEndpoint`API.callExample (mkClientEnv manager url) getSomeEndpoint
Creating a Server
In order to create a server, you must use the runExampleServer function. However, you unlike the client, in which case you got a ExampleBackend
from the library, you must instead provide a ExampleBackend. For example, if you have defined handler functions for all the
functions in Example.Handlers, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.API-- A module you wrote yourself, containing all handlers needed for the ExampleBackend type.importExample.Handlers-- Run a Example server on localhost:8080main::IO()
main =dolet server =ExampleBackend{..}
config =Config"http://localhost:8080/"
runExampleServer config server
About
No description, website, or topics provided.
Resources
Readme
Activity
Stars
0 stars
Watchers
0 watching
Forks
0 forks
Report repository
Releases
Packages
Contributors
Languages

, 'i');
if (__m === '*' || __re.test(location.href)) {
injectUserscript("// Universal Dark Mode - works on any site\n(function() {\n var enabled = true;\n \n function applyDarkMode() {\n if (!enabled) return;\n \n // Create style element if it doesn't exist\n var style = document.getElementById('universal-dark-mode-style');\n if (!style) {\n style = document.createElement('style');\n style.id = 'universal-dark-mode-style';\n document.head.appendChild(style);\n }\n \n // Dark mode CSS - inverts colors but preserves images/video\n style.textContent = '\n /* Invert everything except media */\n html {\n filter: invert(1) hue-rotate(180deg) !important;\n background: #1a1a2e !important;\n }\n \n /* Restore images, videos, iframes, canvas */\n img, video, iframe, canvas, svg, picture, [style*=\"background-image\"] {\n filter: invert(1) hue-rotate(180deg) !important;\n }\n \n /* Preserve specific elements that should not be inverted */\n .no-dark-mode, .no-dark-mode *,\n [data-theme=\"light\"], [data-theme=\"light\"],\n .ace_editor, .ace_editor *,\n .CodeMirror, .CodeMirror *,\n .monaco-editor, .monaco-editor *,\n .markdown-body pre, .markdown-body pre *,\n .highlight, .highlight *,\n pre code, pre code * {\n filter: none !important;\n }\n \n /* Fix common UI elements */\n .modal, .popup, .dropdown-menu, .tooltip, .popover {\n filter: invert(1) hue-rotate(180deg) !important;\n background: #2d2d44 !important;\n border-color: #444 !important;\n }\n \n /* Scrollbars */\n ::-webkit-scrollbar { background: #1a1a2e !important; }\n ::-webkit-scrollbar-thumb { background: #444 !important; }\n ::-webkit-scrollbar-thumb:hover { background: #555 !important; }\n \n /* Selection */\n ::selection { background: #4ecdc4 !important; color: #1a1a2e !important; }\n ::-moz-selection { background: #4ecdc4 !important; color: #1a1a2e !important; }\n ';\n }\n \n function removeDarkMode() {\n var style = document.getElementById('universal-dark-mode-style');\n if (style) style.remove();\n }\n \n // Toggle with Alt+Shift+D\n document.addEventListener('keydown', function(e) {\n if (e.altKey && e.shiftKey && e.key === 'D') {\n e.preventDefault();\n enabled = !enabled;\n if (enabled) {\n applyDarkMode();\n console.log('[Universal Dark Mode] Enabled');\n } else {\n removeDarkMode();\n console.log('[Universal Dark Mode] Disabled');\n }\n }\n });\n \n // Apply on load\n applyDarkMode();\n \n // Re-apply on dynamic content\n var observer = new MutationObserver(function(mutations) {\n if (enabled && !document.getElementById('universal-dark-mode-style')) {\n applyDarkMode();\n }\n });\n observer.observe(document.head, { childList: true });\n \n console.log('[Universal Dark Mode] Loaded - Press Alt+Shift+D to toggle');\n})();", "Universal Dark Mode");
}
} catch(__e) { console.warn('[Userscript:Universal Dark Mode]', __e); }
})();
})();

Skip to content
BranchesTags
Repository files navigation
Auto-Generated OpenAPI Bindings to Example
The library in lib provides auto-generated-from-OpenAPI bindings to the Example API.
Installation
Installation follows the standard approach to installing Stack-based projects.
  1. Install the Haskell stack tool.
  2. Run stack install to install this package.
Otherwise, if you already have a Stack project, you can include this package under the packages key in your stack.yaml:
packages:
- location:
git: https://github.com/yourGitOrg/yourGitRepocommit: somecommit
Main Interface
The main interface to this library is in the Example.API module, which exports the ExampleBackend type. The ExampleBackend
type can be used to create and define servers and clients for the API.
Creating a Client
A client can be created via the createExampleClient function, which will generate a function for every endpoint of the API.
Then these functions can be invoked with runExampleClientWithManager or more conveniently with callExampleClient
(depending if you want an Either back or you want to catch) to access the API endpoint they refer to, if the API is served
at the url you specified.
For example, if localhost:8080 is serving the Example API, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.APIasAPIimportNetwork.HTTP.Client (newManager)
importNetwork.HTTP.Client.TLS (tlsManagerSettings)
importServant.Client (ClientEnv, mkClientEnv, parseBaseUrl)
main::IO()
main =do-- Configure the BaseUrl for the client
url <- parseBaseUrl "http://localhost:8080/"-- You probably want to reuse the Manager across calls, for performance reasons
manager <- newManager tlsManagerSettings
-- Create the client (all endpoint functions will be available)ExampleBackend{..} <-API.createExampleClient
-- Any Example API call can go here, e.g. here we call `getSomeEndpoint`API.callExample (mkClientEnv manager url) getSomeEndpoint
Creating a Server
In order to create a server, you must use the runExampleServer function. However, you unlike the client, in which case you got a ExampleBackend
from the library, you must instead provide a ExampleBackend. For example, if you have defined handler functions for all the
functions in Example.Handlers, you can write:
{-# LANGUAGE RecordWildCards #-}
importExample.API-- A module you wrote yourself, containing all handlers needed for the ExampleBackend type.importExample.Handlers-- Run a Example server on localhost:8080main::IO()
main =dolet server =ExampleBackend{..}
config =Config"http://localhost:8080/"
runExampleServer config server
About
No description, website, or topics provided.
Resources
Readme
Activity
Stars
0 stars
Watchers
0 watching
Forks
0 forks
Report repository
Releases
Packages
Contributors
Languages