Skip to content

Instantly share code, notes, and snippets.

View JonasPammer's full-sized avatar

Jonas Pammer JonasPammer

View GitHub Profile
<#
Based on https://superuser.com/questions/1615553/path-to-current-desktop-background-in-windows-10-slideshow
enhanced with Copilot to work on multiple screens
#>
# Load Windows Forms for screen information.
Add-Type -AssemblyName System.Windows.Forms
# Function to extract the actual file path from the registry data.
function Get-WallpaperPath {
param ([byte[]]$Data)
@JonasPammer
JonasPammer / super-linter.env
Created April 27, 2025 21:10
all super-linter options as single env vars file
#ANSIBLE_CONFIG_FILE=.ansible-lint.yml
#ANSIBLE_DIRECTORY=/ansible
#BASH_EXEC_IGNORE_LIBRARIES=false
#CHECKOV_FILE_NAME=.checkov.yaml
#CLANG_FORMAT_FILE_NAME=.clang-format
#CREATE_LOG_FILE=false
#CSS_FILE_NAME=.stylelintrc.json
#DISABLE_ERRORS=false
#DOCKERFILE_HADOLINT_FILE_NAME=.hadolint.yaml
#EDITORCONFIG_FILE_NAME=.editorconfig
@JonasPammer
JonasPammer / bootstrap-debug.css
Last active February 21, 2025 18:48
bootstrap-debug.css
gist title
@JonasPammer
JonasPammer / TestFilterDebugMessages.groovy
Last active May 13, 2024 14:11
TestFilterDebugMessages
package nesevo.logging.filters;
import ch.qos.logback.classic.Level;
import ch.qos.logback.classic.spi.ILoggingEvent;
import ch.qos.logback.core.filter.Filter;
import ch.qos.logback.core.spi.FilterReply;
public class TestFilterDebugMessages extends Filter<ILoggingEvent> {
@Override
public FilterReply decide(ILoggingEvent event) {
# https://renatogolia.com/2020/11/16/quickly-cloning-all-your-repositories-from-github/
((gh api graphql -f query='query myRepos { viewer { repositories(first: 100, isFork: false, affiliations: OWNER, orderBy: {direction: ASC, field: NAME}) { nodes { name, sshUrl } } } }') | ConvertFrom-Json).data.viewer.repositories.nodes | ForEach-Object { gh repo clone $_.sshUrl $_.name }
@JonasPammer
JonasPammer / SaveEmailsAsMSG.vba
Last active October 23, 2023 14:45
Outlook VBA/OTM Macro to save every message in a selected folder as its own .msg
Sub SaveEmailsAsMSG()
Dim olApp As Object
Dim olNs As Object
Dim olFolder As Object
Dim olMail As Object
Dim olItem As Object
Dim olName As String
Dim olSubfolder As String
Dim saveFolderPath As String
@JonasPammer
JonasPammer / conventional-commits.md
Last active June 10, 2022 08:01 — forked from Zekfad/conventional-commits.md
Conventional Commits Cheatsheet