This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
def shopify_login(shop) | |
OmniAuth.config.test_mode = true | |
OmniAuth.config.add_mock(:shopify, provider: 'shopify', uid: shop.myshopify_domain, | |
credentials: { token: shop.api_token }) | |
Rails.application.env_config['omniauth.auth'] = OmniAuth.config.mock_auth[:shopify] | |
get "/auth/shopify/callback?shop=#{shop.myshopify_domain}" | |
follow_redirect! |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# frozen_string_literal: true | |
require 'rails_helper' | |
RSpec.describe 'ShopsController', type: :request do | |
def login(shop) | |
OmniAuth.config.test_mode = true | |
OmniAuth.config.add_mock(:shopify, provider: 'shopify', uid: shop.myshopify_domain, | |
credentials: { token: shop.api_token }) | |
Rails.application.env_config['omniauth.auth'] = OmniAuth.config.mock_auth[:shopify] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
query = %{ { products(first: 20, query: "title:*bik*") | |
{ edges { node { id | |
title | |
priceRange { maxVariantPrice { amount } minVariantPrice { amount } } | |
featuredImage { transformedSrc altText } | |
variants(first:10) { edges { node { id title price } } } } } } } } | |
url = 'https://dev-store-rdigital.myshopify.com/admin/api/2020-07/graphql.json' | |
def api_headers |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
I tried following the Cider docs but I was getting the message: | |
Wrong number of arguments: (4 . 4), 0 | |
Error from syntax checker clojure-cider-eastwood: Done with no errors | |
Anyhow I could fix it, the next should work: | |
;; My file in $HOME/.lein/profiles.clj. | |
{:user { | |
:dependencies [ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; In a new hotel containing 100 rooms, Tom was hired to paint the numbers from 1-100 on the doors. | |
;; How many times will Tom have to paint the number 8? | |
(get (frequencies (clojure.string/join (range 101))) \8) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defn ^:export flash-timeout [] | |
(when-let [flash-msg (gdom/getElement "flash-msg")] | |
(js/setTimeout #(set! (.-className %) "css-hidden-class") 4000 flash-msg))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defn str-to-int | |
"Convert some string keys in a map to integer" | |
[coll & int-keys] | |
(let [listed (set int-keys)] | |
(reduce-kv #(assoc %1 %2 (if (contains? listed %2 ) (Integer/parseInt %3) %3)) {} coll))) | |
(str-to-int {:qt "56" :kl "Some String" :wer "22" :jj "This is ok" :aa "456" :ll "Address"} :aa :qt :wer) | |
;; => {:qt 56, :kl "Some String", :wer 22, :jj "This is ok", :aa 456, :ll "Address"} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns clj-odf.core | |
(:import java.net.URI | |
org.odftoolkit.simple.TextDocument | |
org.odftoolkit.simple.table.Cell | |
org.odftoolkit.simple.table.Table | |
org.odftoolkit.simple.text.list.List)) | |
(defn generate-odf [filename] | |
(let [outputOdt (TextDocument/newTextDocument) | |
uri (URI. "/home/manuel/Documents/lisplogo_fancy_256.png") |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(:require [java-time :as jt])) | |
(defn format-date | |
"Format a Java instant" | |
[date] | |
(let [formatter (jt/format "dd-MM-yyyy HH:mm")] | |
(jt/format formatter (.atZone date (jt/zone-id))))) | |
;; clj-time is now deprecated |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
class Anagram | |
def initialize | |
@unique_anagrams = nil | |
end | |
def my_array | |
@unique_anagrams ||= ["perro", "algo", "qwer","uuu", "lujo", "peorr","lago","edfr", "sadasd", "uljo", "erpro", "perro", "jolu"] | |
end |