Esempio n. 1
0
        public void GetFriendlyNameTest02()
        {
            string actual;

            using (new VsRHostScript(_sessionProvider)) {
                var cmd = new WorkingDirectoryCommand(_interactiveWorkflow);
                cmd.InitializationTask.Wait();
                actual = cmd.GetFriendlyDirectoryName("c:\\");
            };

            actual.Should().Be("c:/");
        }
Esempio n. 2
0
        public void GetFriendlyNameTest01()
        {
            string actual;

            using (new VsRHostScript(_sessionProvider)) {
                var cmd = new WorkingDirectoryCommand(_interactiveWorkflow);
                cmd.InitializationTask.Wait();
                actual = cmd.GetFriendlyDirectoryName(Environment.GetFolderPath(Environment.SpecialFolder.Personal));
            };

            actual.Should().Be("~");
        }
Esempio n. 3
0
        public void SetDirectoryTest()
        {
            string dir = "c:\\";
            string actual;

            using (new VsRHostScript(_sessionProvider)) {
                var cmd = new WorkingDirectoryCommand(_interactiveWorkflow);
                cmd.InitializationTask.Wait();
                cmd.SetDirectory(dir).Wait();
                actual = _interactiveWorkflow.RSession.GetRWorkingDirectoryAsync().Result;
            }

            actual.Should().Be(dir);
        }
Esempio n. 4
0
        public void DefaultDirectoryTest()
        {
            string myDocs = Environment.GetFolderPath(Environment.SpecialFolder.Personal);
            string actual;

            using (var script = new VsRHostScript(_sessionProvider)) {
                var cmd = new WorkingDirectoryCommand(_interactiveWorkflow);
                cmd.InitializationTask.Wait();
                cmd.UserDirectory.Should().BeEquivalentTo(myDocs);
                actual = script.Session.GetRWorkingDirectoryAsync().Result;
            };

            actual.Should().Be(myDocs);
        }
Esempio n. 5
0
        public void GetFullPathNameTest()
        {
            string dir;

            using (new VsRHostScript()) {
                var cmd = new WorkingDirectoryCommand(_interactiveWorkflow);
                cmd.InitializationTask.Wait();
                dir = cmd.GetFullPathName("~");
            }

            string actual = Environment.GetFolderPath(Environment.SpecialFolder.Personal);

            actual.Should().Be(dir);
        }
Esempio n. 6
0
 public CurrentDirectoryTest(IServiceContainer services) : base(services)
 {
     _cmd = new WorkingDirectoryCommand(Workflow as IRInteractiveWorkflowVisual);
 }