From e50b8fa9e02b19ece80ebeb576051e451d3a7812 Mon Sep 17 00:00:00 2001
From: Matias Linares <matiaslina@gmail.com>
Date: Tue, 24 Mar 2020 19:37:11 -0300
Subject: Rename some things to from perl6 to raku

---
 examples/send-message.p6 | 24 ------------------------
 1 file changed, 24 deletions(-)
 delete mode 100644 examples/send-message.p6

(limited to 'examples/send-message.p6')

diff --git a/examples/send-message.p6 b/examples/send-message.p6
deleted file mode 100644
index 4824be5..0000000
--- a/examples/send-message.p6
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/usr/bin/env perl6
-use v6;
-use lib 'lib';
-use Matrix::Client;
-
-sub MAIN(:$room-id?, :$room-alias?, *@args) {
-    unless $room-id.so || $room-alias.so {
-        fail 'Missing room-id or room-alias';
-    }
-    my Matrix::Client $client .= new:
-        :home-server(%*ENV<MATRIX_HOMESERVER>),
-        :access-token($*ENV<MATRIX_ACCESS_TOKEN>);
-
-    my $id;
-    if $room-id.so {
-        $id = $room-id;
-    } else {
-        say "Searching for $room-alias";
-        $id = $client.get-room-id($room-alias);
-    }
-
-    my $event = $client.send($id, @args.join(' '));
-    say $event;
-}
-- 
cgit v1.2.3-70-g09d2