From cbe479145c140347217a70550a9e613fb6f73f83 Mon Sep 17 00:00:00 2001
From: Glenn Thompson As my career trajectory veered from being an integral member of an electrical engineering team to assuming the role of Deputy Project Manager, the nature of my daily activities underwent a significant transformation. The hands-on tasks of yesteryears were gradually replaced by a deluge of documentationsâwriting, reviewing, and endless typing. This shift brought with it an unwelcome companion: discomfort in my hands and wrists, a stark reminder of the ergonomic pitfalls of conventional keyboards. It was in this context that my quest for a more ergonomic typing solution began, leading me towards the world of ALICE layout keyboards, with the Q10 Pro by Keychron being my initial foray into this new realm. However, the relief was partial, and the shadow of wrist strain persisted, urging me to delve deeper into the ergonomic keyboard universe. My search for a truly ergonomic solution brought me to the doorstep of the Glove80 by MoErgo. Boasting a unique split design, concave key wells, and a commitment to ergonomics that seemed almost tailor-made for my situation, the Glove80 held the promise of being the oasis I was desperately seeking in the desert of my wrist discomfort. This journey from an ALICE layout keyboard user to a Glove80 enthusiast was not just about finding a better typing tool; it was about embracing a healthier typing posture and redefining my interaction with computers. After a month of integrating the Glove80 into my workflow, I'm ready to share my insights and experiences. This review will explore the initial adaptation period, the impact on my wrist health, and whether the Glove80 lives up to its promise as an ergonomic game-changer. Upon beginning my typing journey with the Glove80, two aspects immediately stood out. The unique choc spacing, combined with finger-specific curves for each key column, facilitated effortless access to the bottom and number rows, as well as several function keysâwithout the need to move my hands. This ease of reach extended to the thumb keys, thoughtfully laid out in an arc to match the natural movement of my thumbs. Additionally, the keyboard's low profile on the desk encouraged a neutral wrist position, enhancing comfort during long typing sessions. These features converged to create a typing experience that was not just comfortable but intuitively aligned with natural hand movements. The hallmark of the Glove80 is its ergonomics, designed to seamlessly integrate with the user's hand movements. After fine-tuning the tenting and tilting anglesâmade possible by the adjustable feet on each half of the keyboardâmy hands naturally fell into the optimal typing position. The thoughtfully designed key layout meant that reaching for higher rows required merely straightening or curling my fingers, aided by the keyboard's choc spacing. Each column's unique height and curve catered to the different lengths of my fingers, further minimizing strain. The Glove80 introduces keycaps with a novel MCC profile, featuring raised sides and a central cylindrical channel, made from a slick POM material. This design supports the natural sliding of fingers across keys, reducing the need to lift hands while typing. The keyboard's thumb clusters are another highlight, offering six easily accessible keys per hand. This ergonomic layout ensures that most keys are within reach without stretching, a testament to the keyboard's user-centric design. The Glove80 keyboard represents a significant leap forward in ergonomic design, marrying aesthetics with unmatched comfort and functionality. Its thoughtful featuresâfrom the infinitely adjustable tenting to the innovative keycap designâset a new standard for what ergonomic keyboards can be. While there's room for improvement in switch selection and RGB customization, these are minor quibbles in an otherwise outstanding product. For those in search of ergonomic excellence without compromising on style or performance, the Glove80 is an investment worth making, promising a typing experience that's not just comfortable but truly enjoyable. A few months ago, I shared my journey into learning Scheme through building One of the most important lessons I learned was the value of modular design. Breaking down a program into focused, single-responsibility modules not only makes the code more maintainable but also helps in reasoning about the program's behavior. Here's how I structured Each module has a specific responsibility: One of the first challenges in building a file management tool is handling paths correctly. Here's how I approached it: This approach ensures that: Real-world tools often need to handle conflicts. I implemented an interactive conflict resolution system: This provides a user-friendly interface for resolving conflicts while maintaining data safety. Proper logging is crucial for debugging and auditing. I implemented a simple but effective logging system: This logging system: When dealing with file system operations, safety is paramount. Here's how I handle moving directories: This implementation: Building The code examples in this post are from my actual implementation of I've spent my career as an electrical engineer, not a software developer. However, my recent journey in to GNU/Liniux required a tool for managing symlinks, and that's how I began learning Schemeâspecifically Guile Scheme. I'm writing this post to share how I built My programming background was VERY limited, I produce documents in (La)Tex but I decided to take the plunge into learning Scheme, thanks to a course led by David Wilson from System Crafters. The course, "Hands-On Guile Scheme for Beginners", was incredibly helpful in making Scheme accessible even for someone like me, without a traditional programming background. I know (La)Tex isn't a programming language, it's typesetting. But how hard can it be? Right? The course took me through the basics of Scheme, from simple expressions to more complex concepts like functions, recursion, and working with files. This structured learning environment gave me the confidence to start building The course was "instructor-led" with live meet-up sessions weekly. David has since made this course on-demand, and will be, if not already, available at the above link. Highly recommended if you are interested in taking your first steps with scheme. After completing David Wilson's course, I wanted to put my newly found Guile Scheme skills into practice with a real project. It wasn't enough just to understand the language conceptuallyâI needed to build something tangible that solved a problem I encountered regularly in my workflow. Writing After migrating to GNU/Linux and speaking with other System Crafters Community members, I found I needed a way to manage symbolic links and organize directories. Existing tools like GNU Stow helped, but I wanted to learn how such tools are built. I decided to write my own version using Guile Scheme to enhance my understanding of the language and to have more control over the functionality. The goal of The core of Here's an excerpt of the core functionality that handles moving a source directory and creating a symlink: This project taught me a lot about not just Scheme, but programming in general: Guile Scheme Documentation Guile Reference Manual Scheme Wiki Guile at Schemers.org System Crafters Guile Users Mailing List Guile Cookbook #guile and #scheme on Libera Chat IRC #systemcrafters on Libera Chat IRC I am still refining If you're curious about Scheme and how it can be used practically, I highly recommend checking out David Wilson's course. It's been instrumental in helping me grasp the concepts I needed to build this tool. Here's the link, again :) "Hands-On Guile Scheme for Beginners" As a long-time user of Arch Linux, I decided to explore the world of GNU Guix to see if it could better suit my needs, especially with my growing interest in functional package management. The journey was insightful, filled with learning experiences, but ultimately led me back to the reliable shores of Arch. Here's a detailed account of my venture into GNU Guix, adding non-GNU channels, dealing with Nvidia drivers, running SwayWM, and the eventual retreat to Arch. The installation process of GNU Guix was straightforward, thanks to the well-documented guide provided on their official website. Here's a quick rundown of the steps I followed: During the installation process a window appears informing you that the My point is, I missed some vital information, so to the guix manual online it was. This can be found here. This link will take you to the dev version of the manual. Something else they don't tell you. This version has a little more detail than the standard manual, and I believe details extra features and may even be a little more up to date. One of the standout features of GNU Guix is the ability to add non-GNU channels to access a wider array of software packages. Here's how I did it: Being a gamer and someone who requires GPU acceleration for certain tasks, Nvidia drivers were a must. Here's the process I followed: To personalize my setup further, I used Additionally, I used the All was good and I had a solid desktop environment running, even though it was gnome desktop. I had never used gnome, and I am more at home with a keyboard driven workflow. I had come from hyprland on Arch and wanted to get back to that workflow. The option I was presented with, in order to continue using wayland, pipewire etc. was SwayWM. Installing SwayWM and it's dependencies and nice to haves was relatively straightforward. add the required packages, sway, swaybg, swayidle, swaylock, to my home-configuration.scm gile and run The first issue I encountered was that sway does not run with the proprietary nvidia drivers, this was on the work laptop. I could get it to run but only after adding the With the system set up, I ran into a major roadblock: accessing SMB shares in a file manager while running SwayWM. To ensure that the problem was not hardware-related, I went out and purchased a Lenovo ThinkPad E16 Gen 1. I upgraded the RAM to 48GB and installed a Lenovo 2TB SSD to make it my personal laptop. However, even on this new setup, I faced the same issues accessing SMB shares and some networking services just wouldn't work. I tried deleting the After several days of troubleshooting and not being able to access my SMB shares reliably, I made the difficult decision to revert to Arch Linux. The steps were: I am still running GNU guix on the work laptop, I had to cave on my personal laptop and revert to Arch. My journey with GNU Guix was both enlightening and challenging. While I appreciate the functional package management and the philosophy behind GNU Guix, certain practical issues, like accessing SMB shares, were deal-breakers for my workflow. Arch Linux continues to be my go-to distribution, providing the flexibility and reliability I need for my daily tasks. So, at the moment I am using my personal laptop for work and still trying to figure out the issues I am having on my work laptop. But, to be honest, I prefer working on the thinkpad over working on the MSI laptop that work handed out :). If you're an enthusiast looking to explore new package management paradigms, I highly recommend giving GNU Guix a try. Just be prepared for a few hiccups along the way, and always have a backup plan! Feel free to share your thoughts and experiences with GNU Guix or any other distributions you've tried. Let's keep the conversation going! Go here to find all the ways you can engage with the SystemCrafters community. It's a great place to hang out and discuss all thing craftery. You will also notice the Craftering ring that I am a part of. Click the links and see blogs by some of the community members. Always interesting to read what other Crafters are up to. Thanks for taking the time to read my blog post. It is greatly appreciated, and I hope you come back. Happy Hacking!! Hello there! I'm Glenn Thompson, and today, I want to share a significant part of my recent journey into the world of Scheme, GNU Guix, and static site generation. My journey began with a desire to dive deeper into programming languages and their ecosystems. I am a member of the System Crafters Community, and its founder, David Wilson, announced a short four week course as an introduction to Guile Scheme. The course, Hands-On Guile Scheme for Beginners, provided me with a robust introduction to Guile Scheme, a language that emphasizes simplicity and elegance. David's clear explanations and practical examples made learning Scheme both engaging and approachable. Inspired by the principles of Scheme, I decided to take a leap further into the open-source world by transitioning from Arch Linux to GNU Guix. The Guix community, particularly the folks in the There are too many individuals to name here that have helped with the installation and configuration on Gnu guix to mention here. You all have been an incredible help for which I am extremely grateful. Thank you all , for enduring my ignorance, and for your patience and your help. As I settled into Guix, I faced a challenge: Hugo, the static site generator I previously used, was not available as a Guix package. This led me to explore alternatives and eventually discover Haunt, a Scheme-based static site generator that aligns perfectly with my newfound appreciation for Scheme and Guix. Transitioning to Haunt wasn't without its challenges. There are no readily available templating systems available for haunt like there are for hugo, but there are plenty of examples here. One of my own primary difficulties was creating a custom template that matched my site's aesthetic requirements and functionality needs. Initially, I struggled with configuring the theme layout and ensuring the CSS was applied correctly. Another hurdle was generating the correct URLs for posts and ensuring that summaries appeared as intended on the front page. Thankfully, the Haunt manual proved to be an invaluable resource throughout this process. The comprehensive documentation provided clear guidance on using various modules, functions, and procedures. By carefully studying the examples and explanations, I was able to overcome the obstacles and achieve the desired results for my site. The manual's detailed descriptions of Haunt's inner workings were particularly helpful in understanding how to leverage the flexibility of Scheme to customize my blog. Moving from Hugo to Haunt required me to create my own template and customize my site's appearance. This was an exciting opportunity to apply the skills I had learned from David's course and experiment with Scheme in a practical context. Haunt's flexibility allowed me to define my own theme layout and structure. Here's a snippet of my To give my site a personalized touch, I crafted a CSS stylesheet that matched my aesthetic preferences. Hereâs an excerpt from my I use the In addition to using Haunt, I adopted hut, a set of command-line tools for interacting with SourceHut, to publish my blog. This streamlined my workflow, making it easier to manage and deploy my site directly from my local environment. Transitioning from Hugo to Haunt, learning Scheme, and embracing GNU Guix has been an enriching experience. It's not just about using new tools; it's about joining a community that values simplicity, transparency, and collaboration. If you're curious about Scheme or GNU Guix, I highly recommend checking out David Wilson's course on System Crafters and joining the discussions on IRC. I am not a developer of any kind, and learning Scheme has opened my eyes as to how I can craft an environment that I want to work in, and not endure a working environment that the computer is forcing upon me. Thank you for reading, and stay tuned for more updates on my journey!First Impressions: Feel and Experience
+The Details That Matter
+Ergonomics at Its Core
+Key Innovations
+Beyond Typing: Features and Flexibility
+
+
+Concluding Thoughts
+Introduction
+stash, a symlink manager. Since then, I've discovered that the gap between learning Scheme and applying it to real-world problems is where the most valuable lessons emerge. This post explores what I've learned about building practical tools with Guile Scheme, sharing both successes and challenges along the way.The Power of Modular Design
+stash:
+(use-modules (ice-9 getopt-long)
+ (stash help) ;; Help module
+ (stash colors) ;; ANSI colors
+ (stash log) ;; Logging module
+ (stash paths) ;; Path handling module
+ (stash conflict) ;; Conflict resolution module
+ (stash file-ops)) ;; File and symlink operations module
+
+
+colors.scm: Handles ANSI color formatting for terminal outputconflict.scm: Manages conflict resolution when files already existfile-ops.scm: Handles file system operationshelp.scm: Provides usage informationlog.scm: Manages logging operationspaths.scm: Handles path manipulation and normalizationRobust Path Handling
+
+(define (expand-home path)
+ "Expand ~ to the user's home directory."
+ (if (string-prefix? "~" path)
+ (string-append (getenv "HOME") (substring path 1))
+ path))
+
+(define (concat-path base path)
+ "Concatenate two paths, ensuring there are no double slashes."
+ (if (string-suffix? "/" base)
+ (string-append (string-drop-right base 1) "/" path)
+ (string-append base "/" path)))
+
+(define (ensure-config-path target-dir)
+ "Ensure that the target directory has .config appended, avoiding double slashes."
+ (let ((target-dir (expand-home target-dir)))
+ (if (string-suffix? "/" target-dir)
+ (set! target-dir (string-drop-right target-dir 1)))
+ (if (not (string-suffix? "/.config" target-dir))
+ (string-append target-dir "/.config")
+ target-dir)))
+
+
+~) are properly expandedInteractive Conflict Resolution
+
+(define (prompt-user-for-action)
+ "Prompt the user to decide how to handle a conflict: overwrite (o), skip (s), or cancel (c)."
+ (display (color-message
+ "A conflict was detected. Choose action - Overwrite (o), Skip (s), or Cancel (c): "
+ yellow-text))
+ (let ((response (read-line)))
+ (cond
+ ((string-ci=? response "o") 'overwrite)
+ ((string-ci=? response "s") 'skip)
+ ((string-ci=? response "c") 'cancel)
+ (else
+ (display "Invalid input. Please try again.\n")
+ (prompt-user-for-action)))))
+Logging for Debugging and Auditing
+
+(define (current-timestamp)
+ "Return the current date and time as a formatted string."
+ (let* ((time (current-time))
+ (seconds (time-second time)))
+ (strftime "%Y-%m-%d-%H-%M-%S" (localtime seconds))))
+
+(define (log-action message)
+ "Log an action with a timestamp to the stash.log file."
+ (let ((log-port (open-file "stash.log" "a")))
+ (display (color-message
+ (string-append "[" (current-timestamp) "] " message)
+ green-text) log-port)
+ (newline log-port)
+ (close-port log-port)))
+
+
+File Operations with Safety
+
+(define (move-source-to-target source-dir target-dir)
+ "Move the entire source directory to the target directory, ensuring .config in the target path."
+ (let* ((target-dir (ensure-config-path target-dir))
+ (source-dir (expand-home source-dir))
+ (source-name (basename source-dir))
+ (target-source-dir (concat-path target-dir source-name)))
+ (if (not (file-exists? target-dir))
+ (mkdir target-dir #o755))
+ (if (file-exists? target-source-dir)
+ (handle-conflict target-source-dir source-dir delete-directory log-action)
+ (begin
+ (rename-file source-dir target-source-dir)
+ (display (format #f "Moved ~a to ~a\n" source-dir target-source-dir))
+ (log-action (format #f "Moved ~a to ~a" source-dir target-source-dir))))
+ target-source-dir))
+
+
+Lessons Learned
+What Worked Well
+
+
+Challenges Faced
+
+
+Moving Forward
+stash has taught me that while functional programming principles are valuable, pragmatism is equally important. The key is finding the right balance between elegant functional code and practical solutions.Resources
+
+stash. Feel free to explore, use, and improve upon them!Introduction
+stash, a utility that mimics GNU Stow's functionality, and how my learning journey was shaped by David Wilson's "Hands-On Guile Scheme for Beginners" course from System Crafters, more about this below.How I Started with Scheme
+stash.Why Build Stash?
+stash gave me that opportunity. It allowed me to apply what I'd learned while also deepening my understanding of file manipulation, command-line tools, and conflict resolutionâall within the Guile Scheme environment.stash is simple: allow users to move directories and create symlinks with conflict resolution, offering options to overwrite, back up, skip, or cancel the operation.Breaking Down Stash
+stash revolves around:
+
+
+;;; Helper function to move source to target
+(define (move-source-to-target source-dir target-dir)
+ "Move the entire source directory to the target directory."
+ (let* ((source-dir (expand-home source-dir))
+ (target-dir (expand-home target-dir))
+ (source-name (basename source-dir))
+ (target-source-dir (string-append target-dir "/" source-name)))
+ (if (file-exists? target-source-dir)
+ ;; Conflict handling here...
+ ...)
+ (rename-file source-dir target-source-dir)
+ (display (format #f "Moved ~a to ~a\n" source-dir target-source-dir))))
+What I Learned
+
+
+Guile Scheme Support Resources
+
+
+
The official documentation for Guile Scheme, which includes tutorials, references, and the Guile Manual.
A comprehensive manual covering core language concepts, libraries, and functions available in Guile Scheme.
A community-maintained wiki that covers various Scheme dialects, including Guile Scheme, with tutorials, guides, and general information on Scheme programming.
A site dedicated to Scheme with resources, libraries, tools, and documentation for Scheme and its implementations, including Guile.
Led by David Wilson, System Crafters provides tutorials and blog posts on Guile Scheme and other GNU tools.
Join the Guile mailing list to ask questions and engage with the Guile Scheme community.
An unofficial GitHub repository with practical code snippets and tips for Guile Scheme, covering various common use cases and tasks.
A helpful IRC channel where you can connect with other Guile users for real-time support and advice.
A SUPER helpful IRC channel not only for guile and scheme, there are a huge variety of different people here. Tell them glenneth sent you.Next Steps
+stash, especially around its conflict resolution system and the way it handles symbolic links. But it's in a usable state, and I'm excited to continue iterating on it. You can check out the code on Codeberg.Installation of GNU Guix
+
+
+dd, I created a bootable USB stick to install GNU Guix on my system.fdisk and set up my file systems. I opted for ext4 for simplicity.System Configuration
+config.scm file is located at /etc/config.scm. The first time I installed gnu guix on my work laptop I missed this message (pilot error) and I had to ask in the System Crafters IRC channel at irc.libera.chat, #systemcrafters. Come and join. It's a great place to be and the community there are an absolute treasure. Use your favourite IRC client or join through the webchat here. We would be glad to see you. Tell them glenneth sent you :).Adding Non-GNU Channels
+
+
+~/.config/guix/channels.scm file to include non-GNU channels.
+(cons* (channel
+ (name 'non-gnu)
+ (url "https://example.com/non-gnu-channel.git"))
+ %default-channels)
+guix pull updated my system to include packages from the non-GNU channel.Installing Nvidia Drivers
+
+
+guix package -i nvidia-driver.Creating My Home Environment
+guix home import to create my own home environment and add packages. This allowed me to have a consistent environment across different machines. I also edited the config.scm file to include the latest Linux kernels and Nvidia drivers.syncthing home-service-type in my home-configuration.scm file to install and configure Syncthing. This setup ensured my files were always in sync across devices, which is crucial for my workflow.GNOME
+Sway
+guix home reconfigure easy! The packages were installed and we were good to go.--unsupported-gpu flag to exec sway. Lo and behold, we had a default sway window manager running.Challenges with SwayWM and SMB Shares
+
+
+gdm login manager in my system configuration file, but after rebooting it was still showing the gnome login window. This was after reading somewhere online that sway was not on friendly terms with the gdm login manager.Returning to Arch Linux
+
+
+Conclusion
+
+Shameless plug
+Discovering Scheme with System Crafters
+The Move to GNU Guix
+#systemcrafters channel on irc.libera.chat, were incredibly supportive and instrumental in helping me navigate this new environment. Their guidance made the switch smooth and rewarding, reinforcing the power and flexibility of GNU Guix as a functional package manager and operating system. More about that experience in another post.From Hugo to Haunt
+Overcoming Challenges with Haunt
+Crafting My Own Template
+Creating the Template
+haunt.scm file, where I defined the theme layout and added custom footer content:
+(use-modules (haunt asset)
+ (haunt builder blog)
+ (haunt builder atom)
+ (haunt builder assets)
+ (haunt reader commonmark)
+ (haunt site)
+ (haunt post)
+ (sxml simple) ; For HTML generation
+ (srfi srfi-1)
+ (srfi srfi-19)) ; For date and time procedures
+
+;; Load custom templates
+(load "templates/post.scm")
+
+(define (format-date date)
+ (date->string date "~Y-~m-~d"))
+
+;; Define a function to generate the URL for a post
+(define (post-url post)
+ (string-append "/" (post-slug post) ".html"))
+
+;; Define a function to extract a summary from the post content
+(define (post-summary post)
+ (let ((content (post-sxml post)))
+ (if (null? content)
+ ""
+ (let ((first-paragraph (car content)))
+ (if (string? first-paragraph)
+ (substring first-paragraph 0 (min 200 (string-length first-paragraph)))
+ (sxml->string first-paragraph))))))
+
+;; Define the theme layout
+(define (theme-layout site title content)
+ (let ((current-year (number->string (date-year (current-date)))))
+ `(html
+ (head
+ (meta (@ (charset "utf-8")))
+ (meta (@ (name "viewport") (content "width=device-width, initial-scale=1.0, shrink-to-fit=no")))
+ (link (@ (rel "stylesheet") (href "/assets/palenight.css")))
+ (style
+ " .craftering {
+ margin: auto;
+ width: 50%;
+ text-align: center;
+ }
+ .webring-text {
+ text-align: center;
+ margin-bottom: 20px;
+ color: white;
+ }
+ .craftering a {
+ color: #dddddd;
+ }
+ .webring-text a {
+ color: #dddddd;
+ }")
+ (title ,title))
+ (body
+ (header (h1 ,(site-title site)))
+ (main ,content)
+ (footer (@ (class "bg-black bottom-0 w-100 pa3") (role "contentinfo"))
+ (div (@ (class "flex justify-between"))
+ (div (@ (class "webring-text"))
+ (p "I am part of the " (a (@ (href "https://systemcrafters.net") (target "_blank")) "System Crafters") " webring:"))
+ (div (@ (class "craftering"))
+ (a (@ (href "https://craftering.systemcrafters.net/@glenneth/previous")) "â")
+ (a (@ (href "https://craftering.systemcrafters.net/")) "craftering")
+ (a (@ (href "https://craftering.systemcrafters.net/@glenneth/next")) "â"))))))))
+
+;; Define the custom theme with a consistent layout for index
+(define my-theme
+ (theme #:name "My Custom Theme"
+ #:layout theme-layout
+ #:post-template post-template
+ #:collection-template
+ (lambda (site title posts prefix)
+ `(div (@ (class "content"))
+ (h2 ,title)
+ (ul
+ ,@(map (lambda (post)
+ `(li
+ (article
+ (header
+ (h3 (a (@ (href ,(post-url post))) ,(post-title post))))
+ (p ,(format-date (post-date post)))
+ (p ,(post-summary post))
+ (p (a (@ (href ,(post-url post))) "Read more...")))))
+ posts))))))
+
+;; Site configuration
+(site #:title "Just Another Personal Blog"
+ #:domain "glenneth.srht.site"
+ #:default-metadata
+ '((author . "Glenn Thompson")
+ (email . "glenn@kirstol.org"))
+ #:readers (list commonmark-reader)
+ #:builders (list
+ (blog #:theme my-theme)
+ (atom-feed)
+ (atom-feeds-by-tag)
+ (static-directory "images")
+ (static-directory "assets")))
+Customizing the CSS
+palenight.css file:
+body {
+ display: flex;
+ justify-content: center;
+ padding: 10px;
+}
+
+.content, header, footer, main {
+ max-width: 90%;
+ padding: 0 5%;
+}
+
+header {
+ text-align: center;
+ margin-bottom: 20px;
+}
+
+footer {
+ text-align: center;
+ margin-top: 20px;
+}
+
+ul {
+ list-style-type: none;
+ padding: 0;
+}
+
+li {
+ margin-bottom: 20px;
+}
+
+a {
+ text-decoration: none;
+}
+
+a:hover {
+ text-decoration: underline;
+}
+
+body {
+ background-color: #292d3e;
+ color: #d0d0d0;
+}
+
+a {
+ color: #82aaff;
+}
+
+h1, h2, h3, h4, h5, h6 {
+ color: #c792ea;
+}
+
+.content {
+ background-color: #1e1e2e;
+ padding: 20px;
+ border-radius: 5px;
+}
+
+article {
+ background-color: #282a36;
+ padding: 15px;
+ border-radius: 8px;
+ margin-bottom: 20px;
+}
+
+article header {
+ margin-bottom: 10px;
+}
+
+.date {
+ color: #6272a4;
+ font-size: 0.9em;
+}
+
+/* Additional styles for the craftering */
+.craftering {
+ margin: auto;
+ width: 50%;
+ text-align: center;
+}
+
+.webring-text {
+ text-align: center;
+ margin-bottom: 20px;
+ color: white;
+}
+
+.craftering a {
+ color: #dddddd;
+}
+
+.webring-text a {
+ color: #dddddd;
+}
+
+/* Additions for mobile device readability */
+
+meta {
+ name: viewport;
+ content: width=device-width, initial-scale=1, shrink-to-fit=no;
+}
+
+@media screen and (max-width: 767px) {
+ /* Customize styles for smaller screens */
+ .logo {
+ max-width: 200px;
+ }
+
+}
+doom-palenight theme in Emacs, my preferred text editor, and I wanted my site to match that aesthetic.Publishing with Haunt and Hut
+Conclusion
+
It all started on a Monday morning in Amman as I embarked on a journey to attend a Quality Control (QC) conference in Newcastle. The anticipation of presenting my work at an international forum filled me with excitement and nerves. The conference was scheduled for just one day, but the impact it had on me would last much longer.
+Tuesday arrived, and with it came the day of the conference. Armed with a PowerPoint presentation comprising over 130 slides, I delved into four hours of intense presenting. Despite the pressure, the conference was a resounding success. My project received positive feedback, and I felt a sense of accomplishment as I shared my work with colleagues from around the world.
+However, as I returned to Amman on Wednesday, I couldn't shake off a sense of exhaustion. Little did I know that the toll of travel would soon manifest itself in a most unexpected manner.
+Thursday morning greeted me with heavy flu-like symptoms. It hit me like a ton of bricks. The combination of jet lag, long hours of presenting, and exposure to new environments had taken its toll on my immune system. I was bedridden, grappling with a chesty cough that seemed relentless.
+Despite my illness, there was no time for rest. The following week demanded my presence at a site meeting where I was tasked with condensing my extensive slide deck into a concise presentation of just 12 slides. The challenge was daunting, but I tackled it with determination.
+As I look back on the rollercoaster week that was, I'm struck by the juxtaposition of success and struggle. From the heights of presenting at an international conference to the lows of battling illness, it was a journey that tested my resilience and resolve.
+But through it all, one thing remains clear: adversity only serves to make us stronger. Each obstacle we overcome, whether professional or personal, contributes to our growth and development.
+So here's to the rollercoaster weeks, the ones filled with ups and downs, twists and turns. For it is in those moments of challenge that we discover the true extent of our capabilities.
+As I upload this blog post using Hugo, I do so with a renewed sense of gratitude for the journey and all it has taught me. Here's to embracing the ride, wherever it may take us.
+]]> + https://glenneth.org/content/posts/2024-05-01-amman-newcastle-journey.html +As my career trajectory veered from being an integral member of an electrical engineering team to assuming the role of Deputy Project Manager, the nature of my daily activities underwent a significant transformation. The hands-on tasks of yesteryears were gradually replaced by a deluge of documentationsâwriting, reviewing, and endless typing. This shift brought with it an unwelcome companion: discomfort in my hands and wrists, a stark reminder of the ergonomic pitfalls of conventional keyboards. It was in this context that my quest for a more ergonomic typing solution began, leading me towards the world of ALICE layout keyboards, with the Q10 Pro by Keychron being my initial foray into this new realm.
+However, the relief was partial, and the shadow of wrist strain persisted, urging me to delve deeper into the ergonomic keyboard universe. My search for a truly ergonomic solution brought me to the doorstep of the Glove80 by MoErgo. Boasting a unique split design, concave key wells, and a commitment to ergonomics that seemed almost tailor-made for my situation, the Glove80 held the promise of being the oasis I was desperately seeking in the desert of my wrist discomfort.
+This journey from an ALICE layout keyboard user to a Glove80 enthusiast was not just about finding a better typing tool; it was about embracing a healthier typing posture and redefining my interaction with computers. After a month of integrating the Glove80 into my workflow, I'm ready to share my insights and experiences. This review will explore the initial adaptation period, the impact on my wrist health, and whether the Glove80 lives up to its promise as an ergonomic game-changer.
+Upon beginning my typing journey with the Glove80, two aspects immediately stood out. The unique choc spacing, combined with finger-specific curves for each key column, facilitated effortless access to the bottom and number rows, as well as several function keysâwithout the need to move my hands. This ease of reach extended to the thumb keys, thoughtfully laid out in an arc to match the natural movement of my thumbs. Additionally, the keyboard's low profile on the desk encouraged a neutral wrist position, enhancing comfort during long typing sessions. These features converged to create a typing experience that was not just comfortable but intuitively aligned with natural hand movements.
+The hallmark of the Glove80 is its ergonomics, designed to seamlessly integrate with the user's hand movements. After fine-tuning the tenting and tilting anglesâmade possible by the adjustable feet on each half of the keyboardâmy hands naturally fell into the optimal typing position. The thoughtfully designed key layout meant that reaching for higher rows required merely straightening or curling my fingers, aided by the keyboard's choc spacing. Each column's unique height and curve catered to the different lengths of my fingers, further minimizing strain.
+The Glove80 introduces keycaps with a novel MCC profile, featuring raised sides and a central cylindrical channel, made from a slick POM material. This design supports the natural sliding of fingers across keys, reducing the need to lift hands while typing. The keyboard's thumb clusters are another highlight, offering six easily accessible keys per hand. This ergonomic layout ensures that most keys are within reach without stretching, a testament to the keyboard's user-centric design.
+The Glove80 keyboard represents a significant leap forward in ergonomic design, marrying aesthetics with unmatched comfort and functionality. Its thoughtful featuresâfrom the infinitely adjustable tenting to the innovative keycap designâset a new standard for what ergonomic keyboards can be. While there's room for improvement in switch selection and RGB customization, these are minor quibbles in an otherwise outstanding product. For those in search of ergonomic excellence without compromising on style or performance, the Glove80 is an investment worth making, promising a typing experience that's not just comfortable but truly enjoyable.
+]]>A few months ago, I shared my journey into learning Scheme through building stash, a symlink manager. Since then, I've discovered that the gap between learning Scheme and applying it to real-world problems is where the most valuable lessons emerge. This post explores what I've learned about building practical tools with Guile Scheme, sharing both successes and challenges along the way.
One of the most important lessons I learned was the value of modular design. Breaking down a program into focused, single-responsibility modules not only makes the code more maintainable but also helps in reasoning about the program's behavior. Here's how I structured stash:
(use-modules (ice-9 getopt-long)
+ (stash help) ;; Help module
+ (stash colors) ;; ANSI colors
+ (stash log) ;; Logging module
+ (stash paths) ;; Path handling module
+ (stash conflict) ;; Conflict resolution module
+ (stash file-ops)) ;; File and symlink operations module
+
+Each module has a specific responsibility:
+colors.scm: Handles ANSI color formatting for terminal outputconflict.scm: Manages conflict resolution when files already existfile-ops.scm: Handles file system operationshelp.scm: Provides usage informationlog.scm: Manages logging operationspaths.scm: Handles path manipulation and normalizationOne of the first challenges in building a file management tool is handling paths correctly. Here's how I approached it:
+(define (expand-home path)
+ "Expand ~ to the user's home directory."
+ (if (string-prefix? "~" path)
+ (string-append (getenv "HOME") (substring path 1))
+ path))
+
+(define (concat-path base path)
+ "Concatenate two paths, ensuring there are no double slashes."
+ (if (string-suffix? "/" base)
+ (string-append (string-drop-right base 1) "/" path)
+ (string-append base "/" path)))
+
+(define (ensure-config-path target-dir)
+ "Ensure that the target directory has .config appended, avoiding double slashes."
+ (let ((target-dir (expand-home target-dir)))
+ (if (string-suffix? "/" target-dir)
+ (set! target-dir (string-drop-right target-dir 1)))
+ (if (not (string-suffix? "/.config" target-dir))
+ (string-append target-dir "/.config")
+ target-dir)))
+
+This approach ensures that:
+~) are properly expandedReal-world tools often need to handle conflicts. I implemented an interactive conflict resolution system:
+(define (prompt-user-for-action)
+ "Prompt the user to decide how to handle a conflict: overwrite (o), skip (s), or cancel (c)."
+ (display (color-message
+ "A conflict was detected. Choose action - Overwrite (o), Skip (s), or Cancel (c): "
+ yellow-text))
+ (let ((response (read-line)))
+ (cond
+ ((string-ci=? response "o") 'overwrite)
+ ((string-ci=? response "s") 'skip)
+ ((string-ci=? response "c") 'cancel)
+ (else
+ (display "Invalid input. Please try again.\n")
+ (prompt-user-for-action)))))
+
+This provides a user-friendly interface for resolving conflicts while maintaining data safety.
+Proper logging is crucial for debugging and auditing. I implemented a simple but effective logging system:
+(define (current-timestamp)
+ "Return the current date and time as a formatted string."
+ (let* ((time (current-time))
+ (seconds (time-second time)))
+ (strftime "%Y-%m-%d-%H-%M-%S" (localtime seconds))))
+
+(define (log-action message)
+ "Log an action with a timestamp to the stash.log file."
+ (let ((log-port (open-file "stash.log" "a")))
+ (display (color-message
+ (string-append "[" (current-timestamp) "] " message)
+ green-text) log-port)
+ (newline log-port)
+ (close-port log-port)))
+
+This logging system:
+When dealing with file system operations, safety is paramount. Here's how I handle moving directories:
+(define (move-source-to-target source-dir target-dir)
+ "Move the entire source directory to the target directory, ensuring .config in the target path."
+ (let* ((target-dir (ensure-config-path target-dir))
+ (source-dir (expand-home source-dir))
+ (source-name (basename source-dir))
+ (target-source-dir (concat-path target-dir source-name)))
+ (if (not (file-exists? target-dir))
+ (mkdir target-dir #o755))
+ (if (file-exists? target-source-dir)
+ (handle-conflict target-source-dir source-dir delete-directory log-action)
+ (begin
+ (rename-file source-dir target-source-dir)
+ (display (format #f "Moved ~a to ~a\n" source-dir target-source-dir))
+ (log-action (format #f "Moved ~a to ~a" source-dir target-source-dir))))
+ target-source-dir))
+
+This implementation:
+Building stash has taught me that while functional programming principles are valuable, pragmatism is equally important. The key is finding the right balance between elegant functional code and practical solutions.
The code examples in this post are from my actual implementation of stash. Feel free to explore, use, and improve upon them!
I've spent my career as an electrical engineer, not a software developer. However, my recent journey in to GNU/Liniux required a tool for managing symlinks, and that's how I began learning Schemeâspecifically Guile Scheme. I'm writing this post to share how I built stash, a utility that mimics GNU Stow's functionality, and how my learning journey was shaped by David Wilson's "Hands-On Guile Scheme for Beginners" course from System Crafters, more about this below.
My programming background was VERY limited, I produce documents in (La)Tex but I decided to take the plunge into learning Scheme, thanks to a course led by David Wilson from System Crafters. The course, "Hands-On Guile Scheme for Beginners", was incredibly helpful in making Scheme accessible even for someone like me, without a traditional programming background. I know (La)Tex isn't a programming language, it's typesetting. But how hard can it be? Right?
+The course took me through the basics of Scheme, from simple expressions to more complex concepts like functions, recursion, and working with files. This structured learning environment gave me the confidence to start building stash.
The course was "instructor-led" with live meet-up sessions weekly. David has since made this course on-demand, and will be, if not already, available at the above link. Highly recommended if you are interested in taking your first steps with scheme.
+After completing David Wilson's course, I wanted to put my newly found Guile Scheme skills into practice with a real project. It wasn't enough just to understand the language conceptuallyâI needed to build something tangible that solved a problem I encountered regularly in my workflow. Writing stash gave me that opportunity. It allowed me to apply what I'd learned while also deepening my understanding of file manipulation, command-line tools, and conflict resolutionâall within the Guile Scheme environment.
After migrating to GNU/Linux and speaking with other System Crafters Community members, I found I needed a way to manage symbolic links and organize directories. Existing tools like GNU Stow helped, but I wanted to learn how such tools are built. I decided to write my own version using Guile Scheme to enhance my understanding of the language and to have more control over the functionality.
+The goal of stash is simple: allow users to move directories and create symlinks with conflict resolution, offering options to overwrite, back up, skip, or cancel the operation.
The core of stash revolves around:
Here's an excerpt of the core functionality that handles moving a source directory and creating a symlink:
+;;; Helper function to move source to target
+(define (move-source-to-target source-dir target-dir)
+ "Move the entire source directory to the target directory."
+ (let* ((source-dir (expand-home source-dir))
+ (target-dir (expand-home target-dir))
+ (source-name (basename source-dir))
+ (target-source-dir (string-append target-dir "/" source-name)))
+ (if (file-exists? target-source-dir)
+ ;; Conflict handling here...
+ ...)
+ (rename-file source-dir target-source-dir)
+ (display (format #f "Moved ~a to ~a\n" source-dir target-source-dir))))
+
+This project taught me a lot about not just Scheme, but programming in general:
+Guile Scheme Documentation
The official documentation for Guile Scheme, which includes tutorials, references, and the Guile Manual.
Guile Reference Manual
A comprehensive manual covering core language concepts, libraries, and functions available in Guile Scheme.
Scheme Wiki
A community-maintained wiki that covers various Scheme dialects, including Guile Scheme, with tutorials, guides, and general information on Scheme programming.
Guile at Schemers.org
A site dedicated to Scheme with resources, libraries, tools, and documentation for Scheme and its implementations, including Guile.
System Crafters
Led by David Wilson, System Crafters provides tutorials and blog posts on Guile Scheme and other GNU tools.
Guile Users Mailing List
Join the Guile mailing list to ask questions and engage with the Guile Scheme community.
Guile Cookbook
An unofficial GitHub repository with practical code snippets and tips for Guile Scheme, covering various common use cases and tasks.
#guile and #scheme on Libera Chat IRC
A helpful IRC channel where you can connect with other Guile users for real-time support and advice.
#systemcrafters on Libera Chat IRC
A SUPER helpful IRC channel not only for guile and scheme, there are a huge variety of different people here. Tell them glenneth sent you.
I am still refining stash, especially around its conflict resolution system and the way it handles symbolic links. But it's in a usable state, and I'm excited to continue iterating on it. You can check out the code on Codeberg.
If you're curious about Scheme and how it can be used practically, I highly recommend checking out David Wilson's course. It's been instrumental in helping me grasp the concepts I needed to build this tool. Here's the link, again :) "Hands-On Guile Scheme for Beginners"
+]]>As a long-time user of Arch Linux, I decided to explore the world of GNU Guix to see if it could better suit my needs, especially with my growing interest in functional package management. The journey was insightful, filled with learning experiences, but ultimately led me back to the reliable shores of Arch. Here's a detailed account of my venture into GNU Guix, adding non-GNU channels, dealing with Nvidia drivers, running SwayWM, and the eventual retreat to Arch.
+The installation process of GNU Guix was straightforward, thanks to the well-documented guide provided on their official website. Here's a quick rundown of the steps I followed:
+dd, I created a bootable USB stick to install GNU Guix on my system.fdisk and set up my file systems. I opted for ext4 for simplicity.During the installation process a window appears informing you that the config.scm file is located at /etc/config.scm. The first time I installed gnu guix on my work laptop I missed this message (pilot error) and I had to ask in the System Crafters IRC channel at irc.libera.chat, #systemcrafters. Come and join. It's a great place to be and the community there are an absolute treasure. Use your favourite IRC client or join through the webchat here. We would be glad to see you. Tell them glenneth sent you :).
My point is, I missed some vital information, so to the guix manual online it was. This can be found here. This link will take you to the dev version of the manual. Something else they don't tell you. This version has a little more detail than the standard manual, and I believe details extra features and may even be a little more up to date.
+One of the standout features of GNU Guix is the ability to add non-GNU channels to access a wider array of software packages. Here's how I did it:
+~/.config/guix/channels.scm file to include non-GNU channels.(cons* (channel
+ (name 'non-gnu)
+ (url "https://example.com/non-gnu-channel.git"))
+ %default-channels)
+
+guix pull updated my system to include packages from the non-GNU channel.Being a gamer and someone who requires GPU acceleration for certain tasks, Nvidia drivers were a must. Here's the process I followed:
+guix package -i nvidia-driver.To personalize my setup further, I used guix home import to create my own home environment and add packages. This allowed me to have a consistent environment across different machines. I also edited the config.scm file to include the latest Linux kernels and Nvidia drivers.
Additionally, I used the syncthing home-service-type in my home-configuration.scm file to install and configure Syncthing. This setup ensured my files were always in sync across devices, which is crucial for my workflow.
All was good and I had a solid desktop environment running, even though it was gnome desktop. I had never used gnome, and I am more at home with a keyboard driven workflow. I had come from hyprland on Arch and wanted to get back to that workflow. The option I was presented with, in order to continue using wayland, pipewire etc. was SwayWM.
+Installing SwayWM and it's dependencies and nice to haves was relatively straightforward. add the required packages, sway, swaybg, swayidle, swaylock, to my home-configuration.scm gile and run guix home reconfigure easy! The packages were installed and we were good to go.
The first issue I encountered was that sway does not run with the proprietary nvidia drivers, this was on the work laptop. I could get it to run but only after adding the --unsupported-gpu flag to exec sway. Lo and behold, we had a default sway window manager running.
With the system set up, I ran into a major roadblock: accessing SMB shares in a file manager while running SwayWM.
+To ensure that the problem was not hardware-related, I went out and purchased a Lenovo ThinkPad E16 Gen 1. I upgraded the RAM to 48GB and installed a Lenovo 2TB SSD to make it my personal laptop. However, even on this new setup, I faced the same issues accessing SMB shares and some networking services just wouldn't work.
+I tried deleting the gdm login manager in my system configuration file, but after rebooting it was still showing the gnome login window. This was after reading somewhere online that sway was not on friendly terms with the gdm login manager.
After several days of troubleshooting and not being able to access my SMB shares reliably, I made the difficult decision to revert to Arch Linux. The steps were:
+I am still running GNU guix on the work laptop, I had to cave on my personal laptop and revert to Arch. My journey with GNU Guix was both enlightening and challenging. While I appreciate the functional package management and the philosophy behind GNU Guix, certain practical issues, like accessing SMB shares, were deal-breakers for my workflow. Arch Linux continues to be my go-to distribution, providing the flexibility and reliability I need for my daily tasks. So, at the moment I am using my personal laptop for work and still trying to figure out the issues I am having on my work laptop. But, to be honest, I prefer working on the thinkpad over working on the MSI laptop that work handed out :).
+If you're an enthusiast looking to explore new package management paradigms, I highly recommend giving GNU Guix a try. Just be prepared for a few hiccups along the way, and always have a backup plan!
+Feel free to share your thoughts and experiences with GNU Guix or any other distributions you've tried. Let's keep the conversation going!
+Go here to find all the ways you can engage with the SystemCrafters community. It's a great place to hang out and discuss all thing craftery. You will also notice the Craftering ring that I am a part of. Click the links and see blogs by some of the community members. Always interesting to read what other Crafters are up to.
+Thanks for taking the time to read my blog post. It is greatly appreciated, and I hope you come back.
+Happy Hacking!!
+]]>Hello there! I'm Glenn Thompson, and today, I want to share a significant part of my recent journey into the world of Scheme, GNU Guix, and static site generation.
+My journey began with a desire to dive deeper into programming languages and their ecosystems. I am a member of the System Crafters Community, and its founder, David Wilson, announced a short four week course as an introduction to Guile Scheme. The course, Hands-On Guile Scheme for Beginners, provided me with a robust introduction to Guile Scheme, a language that emphasizes simplicity and elegance. David's clear explanations and practical examples made learning Scheme both engaging and approachable.
+Inspired by the principles of Scheme, I decided to take a leap further into the open-source world by transitioning from Arch Linux to GNU Guix. The Guix community, particularly the folks in the #systemcrafters channel on irc.libera.chat, were incredibly supportive and instrumental in helping me navigate this new environment. Their guidance made the switch smooth and rewarding, reinforcing the power and flexibility of GNU Guix as a functional package manager and operating system. More about that experience in another post.
There are too many individuals to name here that have helped with the installation and configuration on Gnu guix to mention here. You all have been an incredible help for which I am extremely grateful. Thank you all , for enduring my ignorance, and for your patience and your help.
+As I settled into Guix, I faced a challenge: Hugo, the static site generator I previously used, was not available as a Guix package. This led me to explore alternatives and eventually discover Haunt, a Scheme-based static site generator that aligns perfectly with my newfound appreciation for Scheme and Guix.
+Transitioning to Haunt wasn't without its challenges. There are no readily available templating systems available for haunt like there are for hugo, but there are plenty of examples here. One of my own primary difficulties was creating a custom template that matched my site's aesthetic requirements and functionality needs. Initially, I struggled with configuring the theme layout and ensuring the CSS was applied correctly. Another hurdle was generating the correct URLs for posts and ensuring that summaries appeared as intended on the front page.
+Thankfully, the Haunt manual proved to be an invaluable resource throughout this process. The comprehensive documentation provided clear guidance on using various modules, functions, and procedures. By carefully studying the examples and explanations, I was able to overcome the obstacles and achieve the desired results for my site. The manual's detailed descriptions of Haunt's inner workings were particularly helpful in understanding how to leverage the flexibility of Scheme to customize my blog.
+Moving from Hugo to Haunt required me to create my own template and customize my site's appearance. This was an exciting opportunity to apply the skills I had learned from David's course and experiment with Scheme in a practical context.
+Haunt's flexibility allowed me to define my own theme layout and structure. Here's a snippet of my haunt.scm file, where I defined the theme layout and added custom footer content:
(use-modules (haunt asset)
+ (haunt builder blog)
+ (haunt builder atom)
+ (haunt builder assets)
+ (haunt reader commonmark)
+ (haunt site)
+ (haunt post)
+ (sxml simple) ; For HTML generation
+ (srfi srfi-1)
+ (srfi srfi-19)) ; For date and time procedures
+
+;; Load custom templates
+(load "templates/post.scm")
+
+(define (format-date date)
+ (date->string date "~Y-~m-~d"))
+
+;; Define a function to generate the URL for a post
+(define (post-url post)
+ (string-append "/" (post-slug post) ".html"))
+
+;; Define a function to extract a summary from the post content
+(define (post-summary post)
+ (let ((content (post-sxml post)))
+ (if (null? content)
+ ""
+ (let ((first-paragraph (car content)))
+ (if (string? first-paragraph)
+ (substring first-paragraph 0 (min 200 (string-length first-paragraph)))
+ (sxml->string first-paragraph))))))
+
+;; Define the theme layout
+(define (theme-layout site title content)
+ (let ((current-year (number->string (date-year (current-date)))))
+ `(html
+ (head
+ (meta (@ (charset "utf-8")))
+ (meta (@ (name "viewport") (content "width=device-width, initial-scale=1.0, shrink-to-fit=no")))
+ (link (@ (rel "stylesheet") (href "/assets/palenight.css")))
+ (style
+ " .craftering {
+ margin: auto;
+ width: 50%;
+ text-align: center;
+ }
+ .webring-text {
+ text-align: center;
+ margin-bottom: 20px;
+ color: white;
+ }
+ .craftering a {
+ color: #dddddd;
+ }
+ .webring-text a {
+ color: #dddddd;
+ }")
+ (title ,title))
+ (body
+ (header (h1 ,(site-title site)))
+ (main ,content)
+ (footer (@ (class "bg-black bottom-0 w-100 pa3") (role "contentinfo"))
+ (div (@ (class "flex justify-between"))
+ (div (@ (class "webring-text"))
+ (p "I am part of the " (a (@ (href "https://systemcrafters.net") (target "_blank")) "System Crafters") " webring:"))
+ (div (@ (class "craftering"))
+ (a (@ (href "https://craftering.systemcrafters.net/@glenneth/previous")) "â")
+ (a (@ (href "https://craftering.systemcrafters.net/")) "craftering")
+ (a (@ (href "https://craftering.systemcrafters.net/@glenneth/next")) "â"))))))))
+
+;; Define the custom theme with a consistent layout for index
+(define my-theme
+ (theme #:name "My Custom Theme"
+ #:layout theme-layout
+ #:post-template post-template
+ #:collection-template
+ (lambda (site title posts prefix)
+ `(div (@ (class "content"))
+ (h2 ,title)
+ (ul
+ ,@(map (lambda (post)
+ `(li
+ (article
+ (header
+ (h3 (a (@ (href ,(post-url post))) ,(post-title post))))
+ (p ,(format-date (post-date post)))
+ (p ,(post-summary post))
+ (p (a (@ (href ,(post-url post))) "Read more...")))))
+ posts))))))
+
+;; Site configuration
+(site #:title "Just Another Personal Blog"
+ #:domain "glenneth.srht.site"
+ #:default-metadata
+ '((author . "Glenn Thompson")
+ (email . "glenn@kirstol.org"))
+ #:readers (list commonmark-reader)
+ #:builders (list
+ (blog #:theme my-theme)
+ (atom-feed)
+ (atom-feeds-by-tag)
+ (static-directory "images")
+ (static-directory "assets")))
+
+To give my site a personalized touch, I crafted a CSS stylesheet that matched my aesthetic preferences. Hereâs an excerpt from my palenight.css file:
body {
+ display: flex;
+ justify-content: center;
+ padding: 10px;
+}
+
+.content, header, footer, main {
+ max-width: 90%;
+ padding: 0 5%;
+}
+
+header {
+ text-align: center;
+ margin-bottom: 20px;
+}
+
+footer {
+ text-align: center;
+ margin-top: 20px;
+}
+
+ul {
+ list-style-type: none;
+ padding: 0;
+}
+
+li {
+ margin-bottom: 20px;
+}
+
+a {
+ text-decoration: none;
+}
+
+a:hover {
+ text-decoration: underline;
+}
+
+body {
+ background-color: #292d3e;
+ color: #d0d0d0;
+}
+
+a {
+ color: #82aaff;
+}
+
+h1, h2, h3, h4, h5, h6 {
+ color: #c792ea;
+}
+
+.content {
+ background-color: #1e1e2e;
+ padding: 20px;
+ border-radius: 5px;
+}
+
+article {
+ background-color: #282a36;
+ padding: 15px;
+ border-radius: 8px;
+ margin-bottom: 20px;
+}
+
+article header {
+ margin-bottom: 10px;
+}
+
+.date {
+ color: #6272a4;
+ font-size: 0.9em;
+}
+
+/* Additional styles for the craftering */
+.craftering {
+ margin: auto;
+ width: 50%;
+ text-align: center;
+}
+
+.webring-text {
+ text-align: center;
+ margin-bottom: 20px;
+ color: white;
+}
+
+.craftering a {
+ color: #dddddd;
+}
+
+.webring-text a {
+ color: #dddddd;
+}
+
+/* Additions for mobile device readability */
+
+meta {
+ name: viewport;
+ content: width=device-width, initial-scale=1, shrink-to-fit=no;
+}
+
+@media screen and (max-width: 767px) {
+ /* Customize styles for smaller screens */
+ .logo {
+ max-width: 200px;
+ }
+
+}
+
+I use the doom-palenight theme in Emacs, my preferred text editor, and I wanted my site to match that aesthetic.
In addition to using Haunt, I adopted hut, a set of command-line tools for interacting with SourceHut, to publish my blog. This streamlined my workflow, making it easier to manage and deploy my site directly from my local environment.
+Transitioning from Hugo to Haunt, learning Scheme, and embracing GNU Guix has been an enriching experience. It's not just about using new tools; it's about joining a community that values simplicity, transparency, and collaboration. If you're curious about Scheme or GNU Guix, I highly recommend checking out David Wilson's course on System Crafters and joining the discussions on IRC.
+I am not a developer of any kind, and learning Scheme has opened my eyes as to how I can craft an environment that I want to work in, and not endure a working environment that the computer is forcing upon me.
+Thank you for reading, and stay tuned for more updates on my journey!
+]]>It all started on a Monday morning in Amman as I embarked on a journey to attend a Quality Control (QC) conference in Newcastle. The anticipation of presenting my work at an international forum filled me with excitement and nerves. The conference was scheduled for just one day, but the impact it had on me would last much longer.
+Tuesday arrived, and with it came the day of the conference. Armed with a PowerPoint presentation comprising over 130 slides, I delved into four hours of intense presenting. Despite the pressure, the conference was a resounding success. My project received positive feedback, and I felt a sense of accomplishment as I shared my work with colleagues from around the world.
+However, as I returned to Amman on Wednesday, I couldn't shake off a sense of exhaustion. Little did I know that the toll of travel would soon manifest itself in a most unexpected manner.
+Thursday morning greeted me with heavy flu-like symptoms. It hit me like a ton of bricks. The combination of jet lag, long hours of presenting, and exposure to new environments had taken its toll on my immune system. I was bedridden, grappling with a chesty cough that seemed relentless.
+Despite my illness, there was no time for rest. The following week demanded my presence at a site meeting where I was tasked with condensing my extensive slide deck into a concise presentation of just 12 slides. The challenge was daunting, but I tackled it with determination.
+As I look back on the rollercoaster week that was, I'm struck by the juxtaposition of success and struggle. From the heights of presenting at an international conference to the lows of battling illness, it was a journey that tested my resilience and resolve.
+But through it all, one thing remains clear: adversity only serves to make us stronger. Each obstacle we overcome, whether professional or personal, contributes to our growth and development.
+So here's to the rollercoaster weeks, the ones filled with ups and downs, twists and turns. For it is in those moments of challenge that we discover the true extent of our capabilities.
+As I upload this blog post using Hugo, I do so with a renewed sense of gratitude for the journey and all it has taught me. Here's to embracing the ride, wherever it may take us.
+]]>Vp+ulvIh{%kHHqFfF=D8i{Je&Fvj{AX6E
z)8o_mxzh&D#Ukv$6UvnNC~0Zw 8UEzQk~_{d|oEN?*_UIt7R-8jwXE}||Om^-%mN7+q$@v_@wNN?vL=Es$|1M|ShHtSixU
zrRSqmo8l|c3?4#)U-;KVs2Ubx&^x?wu3U_Dp);Ww4Cks9vx&17k4+?5i1VUw{FQqY
zrH03&pIjy4rFkv%P$I>OebCQ&evqb!e5Wu4$*bD1zdJ7^rn6uqH{+W3o`L8?s+doK
z$eB-{TRG!)9Ps`}&^et}bmV2I`|iVror?9I>|*S)n>Dw;U>TkL>1hT1w;EX537p~s
zUp4&<_!Ak$YIkxdZOY-#MfGQssqG=h?ZZ~i#hl_6f@(8aNs@5HBkNl?)@{dt4rUy}
zTKw;HLx;GKykNsaa2N9PO(US)>gPzkJZ8zxW~n`20lRa!?Aeakph